home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1991-01-21 | 22.8 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 22 f4 20 3e 3a | 64 65 76 2e 24 2e 21 44 |...". >:|dev.$.!D|
|00000010| 69 73 63 4c 61 62 65 6c | 2e 21 72 75 6e 69 6d 61 |iscLabel|.!runima|
|00000020| 67 65 0d 00 14 04 0d 00 | 1e 19 f4 20 41 75 74 68 |ge......|... Auth|
|00000030| 6f 72 20 3a 20 4e 69 67 | 65 6c 20 47 65 6e 74 0d |or : Nig|el Gent.|
|00000040| 00 28 3c f4 20 20 20 20 | 20 20 20 20 3a 20 37 39 |.(<. | : 79|
|00000050| 20 53 6f 75 74 68 77 61 | 72 6b 20 43 6c 6f 73 65 | Southwa|rk Close|
|00000060| 2c 20 53 54 45 56 45 4e | 41 47 45 2c 20 48 65 72 |, STEVEN|AGE, Her|
|00000070| 74 73 2c 20 53 47 31 20 | 34 50 48 0d 00 32 1a f4 |ts, SG1 |4PH..2..|
|00000080| 20 20 20 20 20 20 20 20 | 3a 20 30 34 33 38 20 37 | |: 0438 7|
|00000090| 32 36 34 33 30 0d 00 3c | 04 0d 00 46 1f 70 72 6f |26430..<|...F.pro|
|000000a0| 67 72 61 6d 5f 6e 61 6d | 65 24 20 3d 20 22 44 69 |gram_nam|e$ = "Di|
|000000b0| 73 63 4c 61 62 65 6c 22 | 0d 00 50 23 70 75 72 70 |scLabel"|..P#purp|
|000000c0| 6f 73 65 24 20 3d 20 22 | 44 69 73 63 20 4c 61 62 |ose$ = "|Disc Lab|
|000000d0| 65 6c 20 70 72 69 6e 74 | 65 72 22 0d 00 5a 29 61 |el print|er"..Z)a|
|000000e0| 75 74 68 6f 72 24 20 20 | 3d 20 22 a9 20 4e 69 67 |uthor$ |= ". Nig|
|000000f0| 65 6c 20 47 65 6e 74 20 | 28 53 68 61 72 65 77 61 |el Gent |(Sharewa|
|00000100| 72 65 29 22 0d 00 64 22 | 76 65 72 73 69 6f 6e 24 |re)"..d"|version$|
|00000110| 20 3d 20 22 31 2e 35 20 | 28 32 30 2d 4a 61 6e 2d | = "1.5 |(20-Jan-|
|00000120| 31 39 39 31 29 22 0d 00 | 6e 1f 70 72 6f 67 5f 64 |1991)"..|n.prog_d|
|00000130| 69 72 24 3d 22 3c 44 69 | 73 63 4c 61 62 65 6c 24 |ir$="<Di|scLabel$|
|00000140| 44 69 72 3e 22 0d 00 78 | 10 f2 67 6c 6f 62 61 6c |Dir>"..x|..global|
|00000150| 5f 76 61 72 73 0d 00 82 | 0f f2 73 77 69 6e 75 6d |_vars...|..swinum|
|00000160| 62 65 72 73 0d 00 8c 2c | 70 72 69 6e 74 65 72 24 |bers...,|printer$|
|00000170| 20 3d 20 a4 72 65 61 64 | 76 61 72 28 22 44 69 73 | = .read|var("Dis|
|00000180| 63 4c 61 62 65 6c 24 50 | 72 69 6e 74 65 72 22 29 |cLabel$P|rinter")|
|00000190| 0d 00 96 14 de 20 74 20 | 34 3a 20 24 74 3d 22 54 |..... t |4: $t="T|
|000001a0| 41 53 4b 22 0d 00 a0 3b | c8 99 20 57 69 6d 70 5f |ASK"...;|.. Wimp_|
|000001b0| 49 6e 69 74 69 61 6c 69 | 73 65 25 2c 32 30 30 2c |Initiali|se%,200,|
|000001c0| 21 74 2c 70 72 6f 67 72 | 61 6d 5f 6e 61 6d 65 24 |!t,progr|am_name$|
|000001d0| 20 b8 20 2c 20 74 68 69 | 73 5f 74 61 73 6b 25 0d | . , thi|s_task%.|
|000001e0| 00 aa 14 c8 99 20 48 6f | 75 72 67 6c 61 73 73 5f |..... Ho|urglass_|
|000001f0| 4f 6e 25 0d 00 b4 0e f2 | 74 65 6d 70 6c 61 74 65 |On%.....|template|
|00000200| 73 0d 00 be 10 f2 6c 6f | 61 64 5f 63 6f 6e 66 69 |s.....lo|ad_confi|
|00000210| 67 0d 00 c8 26 f2 75 70 | 64 61 74 65 69 63 6f 6e |g...&.up|dateicon|
|00000220| 28 69 6e 66 6f 25 2c 31 | 2c 70 72 6f 67 72 61 6d |(info%,1|,program|
|00000230| 5f 6e 61 6d 65 24 29 0d | 00 d2 21 f2 75 70 64 61 |_name$).|..!.upda|
|00000240| 74 65 69 63 6f 6e 28 69 | 6e 66 6f 25 2c 32 2c 70 |teicon(i|nfo%,2,p|
|00000250| 75 72 70 6f 73 65 24 29 | 0d 00 dc 20 f2 75 70 64 |urpose$)|... .upd|
|00000260| 61 74 65 69 63 6f 6e 28 | 69 6e 66 6f 25 2c 33 2c |ateicon(|info%,3,|
|00000270| 61 75 74 68 6f 72 24 29 | 0d 00 e6 21 f2 75 70 64 |author$)|...!.upd|
|00000280| 61 74 65 69 63 6f 6e 28 | 69 6e 66 6f 25 2c 34 2c |ateicon(|info%,4,|
|00000290| 76 65 72 73 69 6f 6e 24 | 29 0d 00 f0 10 f2 64 65 |version$|).....de|
|000002a0| 66 69 6e 65 6d 65 6e 75 | 73 0d 00 fa 15 f2 69 6e |finemenu|s.....in|
|000002b0| 73 74 61 6c 5f 44 69 73 | 63 4c 61 62 65 6c 0d 01 |stal_Dis|cLabel..|
|000002c0| 04 15 c8 99 20 48 6f 75 | 72 67 6c 61 73 73 5f 4f |.... Hou|rglass_O|
|000002d0| 66 66 25 0d 01 0e 04 0d | 01 18 20 ee 20 85 20 f2 |ff%.....|.. . . .|
|000002e0| 65 72 72 6f 72 62 6f 78 | 28 70 72 6f 67 72 61 6d |errorbox|(program|
|000002f0| 5f 6e 61 6d 65 24 29 0d | 01 22 0e f4 20 62 69 74 |_name$).|.".. bit|
|00000300| 73 20 31 31 31 0d 01 2c | 18 f4 20 20 20 20 20 20 |s 111..,|.. |
|00000310| 32 31 30 39 38 37 36 35 | 34 33 32 31 30 0d 01 36 |21098765|43210..6|
|00000320| 1a 6d 61 73 6b 25 20 3d | 20 25 31 31 30 30 30 30 |.mask% =| %110000|
|00000330| 30 31 31 30 30 30 31 0d | 01 40 0d 71 75 69 74 25 |0110001.|.@.quit%|
|00000340| 20 3d 20 a3 0d 01 4a 05 | f5 0d 01 54 29 20 20 c8 | = ...J.|...T) .|
|00000350| 99 20 57 69 6d 70 5f 50 | 6f 6c 6c 25 2c 6d 61 73 |. Wimp_P|oll%,mas|
|00000360| 6b 25 2c 71 25 20 b8 20 | 61 63 74 69 6f 6e 25 2c |k%,q% . |action%,|
|00000370| 71 25 0d 01 5e 12 20 20 | c8 8e 20 61 63 74 69 6f |q%..^. |.. actio|
|00000380| 6e 25 20 ca 0d 01 68 25 | 20 20 20 20 c9 20 20 31 |n% ...h%| . 1|
|00000390| 20 3a f4 20 50 52 4f 43 | 72 65 64 72 61 77 5f 77 | :. PROC|redraw_w|
|000003a0| 69 6e 64 6f 77 28 71 25 | 29 0d 01 72 1f 20 20 20 |indow(q%|)..r. |
|000003b0| 20 c9 20 20 32 20 3a 20 | f2 6f 70 65 6e 5f 77 69 | . 2 : |.open_wi|
|000003c0| 6e 64 6f 77 28 71 25 29 | 0d 01 7c 20 20 20 20 20 |ndow(q%)|..| |
|000003d0| c9 20 20 33 20 3a 20 f2 | 63 6c 6f 73 65 5f 77 69 |. 3 : .|close_wi|
|000003e0| 6e 64 6f 77 28 71 25 29 | 0d 01 86 1f 20 20 20 20 |ndow(q%)|.... |
|000003f0| c9 20 20 36 20 3a 20 f2 | 6d 6f 75 73 65 5f 63 6c |. 6 : .|mouse_cl|
|00000400| 69 63 6b 28 71 25 29 0d | 01 90 1f 20 20 20 20 c9 |ick(q%).|... .|
|00000410| 20 20 38 20 3a 20 f2 6b | 65 79 5f 70 72 65 73 73 | 8 : .k|ey_press|
|00000420| 65 64 28 71 25 29 0d 01 | 9a 1e 20 20 20 20 c9 20 |ed(q%)..|.. . |
|00000430| 20 39 20 3a 20 f2 64 65 | 63 6f 64 65 6d 65 6e 75 | 9 : .de|codemenu|
|00000440| 28 71 25 29 0d 01 a4 1e | 20 20 20 20 c9 20 31 37 |(q%)....| . 17|
|00000450| 2c 31 38 20 3a 20 f2 6d | 65 73 73 61 67 65 28 71 |,18 : .m|essage(q|
|00000460| 25 29 0d 01 ae 07 20 20 | cb 0d 01 b8 0b fd 20 71 |%).... |...... q|
|00000470| 75 69 74 25 0d 01 c2 05 | e0 0d 01 cc 04 0d 01 d6 |uit%....|........|
|00000480| 04 0d 01 e0 16 dd f2 69 | 6e 73 74 61 6c 5f 44 69 |.......i|nstal_Di|
|00000490| 73 63 4c 61 62 65 6c 0d | 01 ea 3e 20 20 ea 20 73 |scLabel.|..> . s|
|000004a0| 77 69 64 74 68 25 2c 73 | 68 65 69 67 68 74 25 2c |width%,s|height%,|
|000004b0| 73 6d 6f 64 65 25 2c 70 | 78 25 2c 70 79 25 2c 73 |smode%,p|x%,py%,s|
|000004c0| 70 72 69 74 65 25 2c 74 | 65 78 74 24 2c 20 73 70 |prite%,t|ext$, sp|
|000004d0| 72 69 74 65 24 0d 01 f4 | 1c 20 20 73 70 72 69 74 |rite$...|. sprit|
|000004e0| 65 24 20 3d 20 22 21 44 | 69 73 63 4c 61 62 65 6c |e$ = "!D|iscLabel|
|000004f0| 22 0d 01 fe 1b 20 20 74 | 65 78 74 24 20 3d 20 70 |".... t|ext$ = p|
|00000500| 72 6f 67 72 61 6d 5f 6e | 61 6d 65 24 0d 02 08 2d |rogram_n|ame$...-|
|00000510| 20 20 de 20 73 70 72 69 | 74 65 25 20 28 a9 28 73 | . spri|te% (.(s|
|00000520| 70 72 69 74 65 24 29 2b | 31 29 2c 74 65 78 74 25 |prite$)+|1),text%|
|00000530| 20 a9 28 74 65 78 74 24 | 29 0d 02 12 2a 20 20 f4 | .(text$|)...* .|
|00000540| 20 76 61 6c 69 64 61 74 | 69 6f 6e 20 73 74 72 69 | validat|ion stri|
|00000550| 6e 67 20 74 6f 20 64 65 | 66 69 6e 65 20 73 70 72 |ng to de|fine spr|
|00000560| 69 74 65 0d 02 1c 1a 20 | 20 24 73 70 72 69 74 65 |ite.... | $sprite|
|00000570| 25 3d 22 53 22 2b 73 70 | 72 69 74 65 24 0d 02 26 |%="S"+sp|rite$..&|
|00000580| 12 20 20 24 74 65 78 74 | 25 3d 74 65 78 74 24 0d |. $text|%=text$.|
|00000590| 02 30 41 20 20 c8 99 20 | 57 69 6d 70 5f 53 70 72 |.0A .. |Wimp_Spr|
|000005a0| 69 74 65 4f 70 25 2c 34 | 30 2c 2c 73 70 72 69 74 |iteOp%,4|0,,sprit|
|000005b0| 65 24 20 b8 20 2c 2c 2c | 73 77 69 64 74 68 25 2c |e$ . ,,,|swidth%,|
|000005c0| 73 68 65 69 67 68 74 25 | 2c 2c 73 6d 6f 64 65 25 |sheight%|,,smode%|
|000005d0| 0d 02 3a 2e 20 20 c8 99 | 20 4f 53 5f 52 65 61 64 |..:. ..| OS_Read|
|000005e0| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 25 2c 73 6d |ModeVari|able%,sm|
|000005f0| 6f 64 65 25 2c 34 20 b8 | 20 2c 2c 70 78 25 0d 02 |ode%,4 .| ,,px%..|
|00000600| 44 1a 20 20 73 77 69 64 | 74 68 25 3d 73 77 69 64 |D. swid|th%=swid|
|00000610| 74 68 25 3c 3c 70 78 25 | 0d 02 4e 2e 20 20 c8 99 |th%<<px%|..N. ..|
|00000620| 20 4f 53 5f 52 65 61 64 | 4d 6f 64 65 56 61 72 69 | OS_Read|ModeVari|
|00000630| 61 62 6c 65 25 2c 73 6d | 6f 64 65 25 2c 35 20 b8 |able%,sm|ode%,5 .|
|00000640| 20 2c 2c 70 79 25 0d 02 | 58 1c 20 20 73 68 65 69 | ,,py%..|X. shei|
|00000650| 67 68 74 25 3d 73 68 65 | 69 67 68 74 25 3c 3c 70 |ght%=she|ight%<<p|
|00000660| 79 25 0d 02 62 33 20 20 | e7 20 a9 28 74 65 78 74 |y%..b3 |. .(text|
|00000670| 24 29 2a 31 36 20 3e 20 | 73 77 69 64 74 68 25 20 |$)*16 > |swidth% |
|00000680| 8c 20 73 77 69 64 74 68 | 25 3d a9 28 74 65 78 74 |. swidth|%=.(text|
|00000690| 24 29 2a 31 36 0d 02 6c | 1b 20 20 21 71 25 3d 2d |$)*16..l|. !q%=-|
|000006a0| 31 20 3a f4 20 61 70 70 | 6c 69 63 61 74 69 6f 6e |1 :. app|lication|
|000006b0| 0d 02 76 0c 20 20 71 25 | 21 34 3d 30 0d 02 80 0e |..v. q%|!4=0....|
|000006c0| 20 20 71 25 21 38 3d 2d | 31 36 0d 02 8a 18 20 20 | q%!8=-|16.... |
|000006d0| 71 25 21 31 32 3d 71 25 | 21 34 2b 73 77 69 64 74 |q%!12=q%|!4+swidt|
|000006e0| 68 25 0d 02 94 17 20 20 | 71 25 21 31 36 3d 32 30 |h%.... |q%!16=20|
|000006f0| 2b 73 68 65 69 67 68 74 | 25 0d 02 9e 15 20 20 71 |+sheight|%.... q|
|00000700| 25 21 32 30 3d 26 31 37 | 30 30 33 31 30 42 0d 02 |%!20=&17|00310B..|
|00000710| a8 11 20 20 71 25 21 32 | 34 3d 74 65 78 74 25 0d |.. q%!2|4=text%.|
|00000720| 02 b2 13 20 20 71 25 21 | 32 38 3d 73 70 72 69 74 |... q%!|28=sprit|
|00000730| 65 25 0d 02 bc 14 20 20 | 71 25 21 33 32 3d a9 28 |e%.... |q%!32=.(|
|00000740| 74 65 78 74 24 29 0d 02 | c6 23 20 20 c8 99 20 57 |text$)..|.# .. W|
|00000750| 69 6d 70 5f 43 72 65 61 | 74 65 49 63 6f 6e 25 2c |imp_Crea|teIcon%,|
|00000760| 2c 71 25 20 b8 20 21 71 | 25 0d 02 d0 05 e1 0d 02 |,q% . !q|%.......|
|00000770| da 04 0d 02 e4 04 0d 02 | ee 05 20 0d 02 f8 04 0d |........|.. .....|
|00000780| 03 02 3b f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..;.----|--------|
|00000790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007a0| 2d 2d 2d 2d 2d 2d 41 70 | 70 6c 69 63 61 74 69 6f |------Ap|plicatio|
|000007b0| 6e 20 73 70 65 63 69 66 | 69 63 0d 03 0c 04 0d 03 |n specif|ic......|
|000007c0| 16 11 dd f2 67 6c 6f 62 | 61 6c 5f 76 61 72 73 0d |....glob|al_vars.|
|000007d0| 03 20 2d 20 20 f4 20 61 | 70 70 6c 69 63 61 74 69 |. - . a|pplicati|
|000007e0| 6f 6e 20 73 70 65 63 69 | 66 69 63 20 67 6c 6f 62 |on speci|fic glob|
|000007f0| 61 6c 20 76 61 72 69 61 | 62 6c 65 73 0d 03 2a 14 |al varia|bles..*.|
|00000800| 20 20 64 69 73 63 6e 61 | 6d 65 24 20 3d 20 22 22 | discna|me$ = ""|
|00000810| 0d 03 34 14 20 20 66 69 | 6c 65 24 20 20 20 20 20 |..4. fi|le$ |
|00000820| 3d 20 22 22 0d 03 3e 13 | 20 20 6c 69 6e 65 25 20 |= ""..>.| line% |
|00000830| 20 20 20 20 3d 20 31 0d | 03 48 14 20 20 6c 69 6e | = 1.|.H. lin|
|00000840| 65 24 20 20 20 20 20 3d | 20 22 22 0d 03 52 38 20 |e$ =| ""..R8 |
|00000850| 20 de 20 69 63 6f 6e 5f | 62 6c 6f 63 6b 25 20 32 | . icon_|block% 2|
|00000860| 35 35 20 20 20 20 3a f4 | 20 73 70 61 63 65 20 66 |55 :.| space f|
|00000870| 6f 72 20 69 6e 64 69 72 | 65 63 74 65 64 20 69 63 |or indir|ected ic|
|00000880| 6f 6e 73 0d 03 5c 2a 20 | 20 f4 20 63 6f 64 65 20 |ons..\* | . code |
|00000890| 74 6f 20 74 65 73 74 20 | 69 66 20 70 72 69 6e 74 |to test |if print|
|000008a0| 65 72 20 69 73 20 6f 6e | 20 6c 69 6e 65 0d 03 66 |er is on| line..f|
|000008b0| 12 20 20 de 20 63 6f 64 | 65 25 20 26 31 30 30 0d |. . cod|e% &100.|
|000008c0| 03 70 11 20 20 de 20 72 | 65 73 75 6c 74 25 20 31 |.p. . r|esult% 1|
|000008d0| 0d 03 7a 15 20 20 e3 20 | 6f 70 74 3d 30 20 b8 20 |..z. . |opt=0 . |
|000008e0| 32 20 88 20 32 0d 03 84 | 10 20 20 20 20 50 25 3d |2 . 2...|. P%=|
|000008f0| 63 6f 64 65 25 0d 03 8e | 10 20 20 20 20 5b 4f 50 |code%...|. [OP|
|00000900| 54 20 6f 70 74 0d 03 98 | 13 20 20 20 20 2e 70 72 |T opt...|. .pr|
|00000910| 69 6e 74 65 72 5f 6f 6e | 0d 03 a2 18 20 20 20 20 |inter_on|.... |
|00000920| 53 57 49 20 22 4f 53 5f | 45 6e 74 65 72 4f 53 22 |SWI "OS_|EnterOS"|
|00000930| 0d 03 ac 12 20 20 20 20 | 54 45 51 50 20 50 43 2c |.... |TEQP PC,|
|00000940| 23 33 0d 03 b6 18 20 20 | 20 20 4d 4f 56 20 52 30 |#3.... | MOV R0|
|00000950| 2c 23 26 33 32 30 30 30 | 30 30 0d 03 c0 16 20 20 |,#&32000|00.... |
|00000960| 20 20 41 44 44 20 52 30 | 2c 52 30 2c 23 26 31 30 | ADD R0|,R0,#&10|
|00000970| 0d 03 ca 14 20 20 20 20 | 4c 44 52 42 20 52 31 2c |.... |LDRB R1,|
|00000980| 5b 52 30 5d 0d 03 d4 12 | 20 20 20 20 80 20 52 31 |[R0]....| . R1|
|00000990| 2c 52 31 2c 23 31 0d 03 | de 16 20 20 20 20 41 44 |,R1,#1..|.. AD|
|000009a0| 52 20 52 30 2c 72 65 73 | 75 6c 74 25 0d 03 e8 14 |R R0,res|ult%....|
|000009b0| 20 20 20 20 53 54 52 42 | 20 52 31 2c 5b 52 30 5d | STRB| R1,[R0]|
|000009c0| 0d 03 f2 12 20 20 20 20 | 54 45 51 50 20 50 43 2c |.... |TEQP PC,|
|000009d0| 23 30 0d 03 fc 15 20 20 | 20 20 84 52 4e 45 20 52 |#0.... | .RNE R|
|000009e0| 30 2c 52 30 2c 52 30 0d | 04 06 12 20 20 20 20 4d |0,R0,R0.|... M|
|000009f0| 4f 56 20 50 43 2c 52 31 | 34 0d 04 10 09 20 20 20 |OV PC,R1|4.... |
|00000a00| 20 5d 0d 04 1a 0b 20 20 | ed 20 6f 70 74 0d 04 24 | ].... |. opt..$|
|00000a10| 05 e1 0d 04 2e 04 0d 04 | 38 13 dd f2 70 72 69 6e |........|8...prin|
|00000a20| 74 65 72 5f 73 65 74 75 | 70 0d 04 42 32 20 20 f4 |ter_setu|p..B2 .|
|00000a30| 20 72 65 73 65 74 20 70 | 72 69 6e 74 65 72 20 61 | reset p|rinter a|
|00000a40| 6e 64 20 73 65 74 75 70 | 20 74 68 65 20 6f 70 74 |nd setup| the opt|
|00000a50| 69 6f 6e 73 20 63 68 6f | 73 65 6e 0d 04 4c 0d 20 |ions cho|sen..L. |
|00000a60| 20 ea 20 6c 6f 6f 70 25 | 0d 04 56 24 20 20 76 6f | . loop%|..V$ vo|
|00000a70| 69 64 25 20 3d 20 a4 73 | 65 6e 64 5f 70 72 69 6e |id% = .s|end_prin|
|00000a80| 74 65 72 28 22 72 65 73 | 65 74 22 29 0d 04 60 4d |ter("res|et")..`M|
|00000a90| 20 20 e3 20 6c 6f 6f 70 | 25 20 3d 20 4f 70 74 69 | . loop|% = Opti|
|00000aa0| 6f 6e 73 6d 65 6e 75 25 | 2b 32 38 20 b8 20 4f 70 |onsmenu%|+28 . Op|
|00000ab0| 74 69 6f 6e 73 6d 65 6e | 75 25 2b 32 38 2b 28 28 |tionsmen|u%+28+((|
|00000ac0| 73 75 62 6d 65 6e 75 69 | 74 65 6d 73 25 2d 31 29 |submenui|tems%-1)|
|00000ad0| 2a 32 34 29 20 88 20 32 | 34 0d 04 6a 20 20 20 20 |*24) . 2|4..j |
|00000ae0| 20 e7 20 28 21 6c 6f 6f | 70 25 20 80 20 26 30 31 | . (!loo|p% . &01|
|00000af0| 29 20 3d 20 26 30 31 20 | 8c 0d 04 74 2c 20 20 20 |) = &01 |...t, |
|00000b00| 20 20 20 76 6f 69 64 25 | 20 3d 20 a4 73 65 6e 64 | void%| = .send|
|00000b10| 5f 70 72 69 6e 74 65 72 | 28 24 28 6c 6f 6f 70 25 |_printer|($(loop%|
|00000b20| 2b 31 32 29 29 0d 04 7e | 09 20 20 20 20 cc 0d 04 |+12))..~|. ...|
|00000b30| 88 16 20 20 20 20 20 20 | f4 20 64 6f 20 6e 6f 74 |.. |. do not|
|00000b40| 68 69 6e 67 0d 04 92 09 | 20 20 20 20 cd 0d 04 9c |hing....| ....|
|00000b50| 33 f4 64 65 62 75 67 24 | 20 3d 20 46 4e 70 72 6f |3.debug$| = FNpro|
|00000b60| 62 6c 65 6d 28 54 52 55 | 45 2c 46 41 4c 53 45 2c |blem(TRU|E,FALSE,|
|00000b70| 22 70 72 69 6e 74 65 72 | 5f 73 65 74 75 70 22 29 |"printer|_setup")|
|00000b80| 0d 04 a6 07 20 20 ed 0d | 04 b0 05 e1 0d 04 ba 04 |.... ..|........|
|00000b90| 0d 04 c4 10 dd f2 63 6c | 65 61 72 73 74 79 6c 65 |......cl|earstyle|
|00000ba0| 0d 04 ce 21 20 20 f4 20 | 63 6c 65 61 72 20 73 65 |...! . |clear se|
|00000bb0| 6c 65 63 74 65 64 20 74 | 79 70 65 20 73 74 79 6c |lected t|ype styl|
|00000bc0| 65 0d 04 d8 1c 20 20 f4 | 20 61 70 70 6c 69 63 61 |e.... .| applica|
|00000bd0| 74 69 6f 6e 20 73 70 65 | 63 69 66 69 63 0d 04 e2 |tion spe|cific...|
|00000be0| 1d 20 20 f2 6e 6f 74 69 | 63 6b 28 4f 70 74 69 6f |. .noti|ck(Optio|
|00000bf0| 6e 73 6d 65 6e 75 25 2c | 30 29 0d 04 ec 1d 20 20 |nsmenu%,|0).... |
|00000c00| f2 6e 6f 74 69 63 6b 28 | 4f 70 74 69 6f 6e 73 6d |.notick(|Optionsm|
|00000c10| 65 6e 75 25 2c 31 29 0d | 04 f6 1d 20 20 f2 6e 6f |enu%,1).|... .no|
|00000c20| 74 69 63 6b 28 4f 70 74 | 69 6f 6e 73 6d 65 6e 75 |tick(Opt|ionsmenu|
|00000c30| 25 2c 32 29 0d 05 00 1d | 20 20 f2 6e 6f 74 69 63 |%,2)....| .notic|
|00000c40| 6b 28 4f 70 74 69 6f 6e | 73 6d 65 6e 75 25 2c 33 |k(Option|smenu%,3|
|00000c50| 29 0d 05 0a 1d 20 20 f2 | 6e 6f 74 69 63 6b 28 4f |).... .|notick(O|
|00000c60| 70 74 69 6f 6e 73 6d 65 | 6e 75 25 2c 34 29 0d 05 |ptionsme|nu%,4)..|
|00000c70| 14 05 e1 0d 05 1e 04 0d | 05 28 04 0d 05 32 11 dd |........|.(...2..|
|00000c80| f2 6f 70 74 69 6f 6e 73 | 6d 65 6e 75 0d 05 3c 1c |.options|menu..<.|
|00000c90| 20 20 f4 20 41 70 70 6c | 69 63 61 74 69 6f 6e 20 | . Appl|ication |
|00000ca0| 73 70 65 63 69 66 69 63 | 0d 05 46 0a 20 20 ea 20 |specific|..F. . |
|00000cb0| 6d 25 0d 05 50 2b 20 20 | 6d 25 20 3d 20 a4 6d 65 |m%..P+ |m% = .me|
|00000cc0| 6e 75 28 4f 70 74 69 6f | 6e 73 6d 65 6e 75 25 2c |nu(Optio|nsmenu%,|
|00000cd0| 22 4f 70 74 69 6f 6e 73 | 22 2c 31 31 29 0d 05 5a |"Options|",11)..Z|
|00000ce0| 1e 20 20 e7 20 70 72 69 | 6e 74 65 72 24 3d 22 53 |. . pri|nter$="S|
|00000cf0| 74 61 72 2d 4c 43 31 30 | 22 20 8c 0d 05 64 3c 20 |tar-LC10|" ...d< |
|00000d00| 20 20 20 6d 25 20 3d 20 | a4 6d 65 6e 75 69 74 65 | m% = |.menuite|
|00000d10| 6d 28 6d 25 2c 22 44 72 | 61 66 74 22 2c 20 20 20 |m(m%,"Dr|aft", |
|00000d20| 20 20 20 20 20 74 69 63 | 6b 25 2c 2d 31 2c 20 6e | tic|k%,-1, n|
|00000d30| 6f 72 6d 61 6c 25 29 0d | 05 6e 3c 20 20 20 20 6d |ormal%).|.n< m|
|00000d40| 25 20 3d 20 a4 6d 65 6e | 75 69 74 65 6d 28 6d 25 |% = .men|uitem(m%|
|00000d50| 2c 22 43 6f 75 72 69 65 | 72 22 2c 20 20 20 20 20 |,"Courie|r", |
|00000d60| 70 6c 61 69 6e 25 2c 2d | 31 2c 20 6e 6f 72 6d 61 |plain%,-|1, norma|
|00000d70| 6c 25 29 0d 05 78 3c 20 | 20 20 20 6d 25 20 3d 20 |l%)..x< | m% = |
|00000d80| a4 6d 65 6e 75 69 74 65 | 6d 28 6d 25 2c 22 4f 72 |.menuite|m(m%,"Or|
|00000d90| 61 74 6f 72 22 2c 20 20 | 20 20 20 20 70 6c 61 69 |ator", | plai|
|00000da0| 6e 25 2c 2d 31 2c 20 6e | 6f 72 6d 61 6c 25 29 0d |n%,-1, n|ormal%).|
|00000db0| 05 82 3c 20 20 20 20 6d | 25 20 3d 20 a4 6d 65 6e |..< m|% = .men|
|00000dc0| 75 69 74 65 6d 28 6d 25 | 2c 22 4f 72 61 74 6f 72 |uitem(m%|,"Orator|
|00000dd0| 20 53 43 22 2c 20 20 20 | 70 6c 61 69 6e 25 2c 2d | SC", |plain%,-|
|00000de0| 31 2c 20 6e 6f 72 6d 61 | 6c 25 29 0d 05 8c 3c 20 |1, norma|l%)...< |
|00000df0| 20 20 20 6d 25 20 3d 20 | a4 6d 65 6e 75 69 74 65 | m% = |.menuite|
|00000e00| 6d 28 6d 25 2c 22 53 61 | 6e 73 20 53 65 72 69 66 |m(m%,"Sa|ns Serif|
|00000e10| 22 2c 20 20 20 20 64 6f | 74 25 2c 2d 31 2c 20 6e |", do|t%,-1, n|
|00000e20| 6f 72 6d 61 6c 25 29 0d | 05 96 07 20 20 cc 0d 05 |ormal%).|... ...|
|00000e30| a0 3c 20 20 20 20 6d 25 | 20 3d 20 a4 6d 65 6e 75 |.< m%| = .menu|
|00000e40| 69 74 65 6d 28 6d 25 2c | 22 44 72 61 66 74 22 2c |item(m%,|"Draft",|
|00000e50| 20 20 20 20 20 20 20 20 | 74 69 63 6b 25 2c 2d 31 | |tick%,-1|
|00000e60| 2c 20 73 68 61 64 65 64 | 25 29 0d 05 aa 3c 20 20 |, shaded|%)...< |
|00000e70| 20 20 6d 25 20 3d 20 a4 | 6d 65 6e 75 69 74 65 6d | m% = .|menuitem|
|00000e80| 28 6d 25 2c 22 43 6f 75 | 72 69 65 72 22 2c 20 20 |(m%,"Cou|rier", |
|00000e90| 20 20 20 70 6c 61 69 6e | 25 2c 2d 31 2c 20 73 68 | plain|%,-1, sh|
|00000ea0| 61 64 65 64 25 29 0d 05 | b4 3c 20 20 20 20 6d 25 |aded%)..|.< m%|
|00000eb0| 20 3d 20 a4 6d 65 6e 75 | 69 74 65 6d 28 6d 25 2c | = .menu|item(m%,|
|00000ec0| 22 4f 72 61 74 6f 72 22 | 2c 20 20 20 20 20 20 70 |"Orator"|, p|
|00000ed0| 6c 61 69 6e 25 2c 2d 31 | 2c 20 73 68 61 64 65 64 |lain%,-1|, shaded|
|00000ee0| 25 29 0d 05 be 3c 20 20 | 20 20 6d 25 20 3d 20 a4 |%)...< | m% = .|
|00000ef0| 6d 65 6e 75 69 74 65 6d | 28 6d 25 2c 22 4f 72 61 |menuitem|(m%,"Ora|
|00000f00| 74 6f 72 20 53 43 22 2c | 20 20 20 70 6c 61 69 6e |tor SC",| plain|
|00000f10| 25 2c 2d 31 2c 20 73 68 | 61 64 65 64 25 29 0d 05 |%,-1, sh|aded%)..|
|00000f20| c8 3c 20 20 20 20 6d 25 | 20 3d 20 a4 6d 65 6e 75 |.< m%| = .menu|
|00000f30| 69 74 65 6d 28 6d 25 2c | 22 53 61 6e 73 20 53 65 |item(m%,|"Sans Se|
|00000f40| 72 69 66 22 2c 20 20 20 | 20 64 6f 74 25 2c 2d 31 |rif", | dot%,-1|
|00000f50| 2c 20 73 68 61 64 65 64 | 25 29 0d 05 d2 07 20 20 |, shaded|%).... |
|00000f60| cd 0d 05 dc 3a 20 20 6d | 25 20 3d 20 a4 6d 65 6e |....: m|% = .men|
|00000f70| 75 69 74 65 6d 28 6d 25 | 2c 22 49 74 61 6c 69 63 |uitem(m%|,"Italic|
|00000f80| 22 2c 20 20 20 20 20 20 | 70 6c 61 69 6e 25 2c 2d |", |plain%,-|
|00000f90| 31 2c 20 6e 6f 72 6d 61 | 6c 25 29 0d 05 e6 3a 20 |1, norma|l%)...: |
|00000fa0| 20 6d 25 20 3d 20 a4 6d | 65 6e 75 69 74 65 6d 28 | m% = .m|enuitem(|
|00000fb0| 6d 25 2c 22 44 6f 75 62 | 6c 65 20 53 74 72 22 2c |m%,"Doub|le Str",|
|00000fc0| 20 20 70 6c 61 69 6e 25 | 2c 2d 31 2c 20 6e 6f 72 | plain%|,-1, nor|
|00000fd0| 6d 61 6c 25 29 0d 05 f0 | 39 20 20 6d 25 20 3d 20 |mal%)...|9 m% = |
|00000fe0| a4 6d 65 6e 75 69 74 65 | 6d 28 6d 25 2c 22 45 6d |.menuite|m(m%,"Em|
|00000ff0| 70 68 61 73 69 7a 65 64 | 22 2c 20 20 6c 61 73 74 |phasized|", last|
|00001000| 25 2c 2d 31 2c 20 6e 6f | 72 6d 61 6c 25 29 0d 05 |%,-1, no|rmal%)..|
|00001010| fa 05 e1 0d 06 04 04 0d | 06 0e 11 dd f2 70 72 69 |........|.....pri|
|00001020| 6e 74 5f 6c 61 62 65 6c | 0d 06 18 18 20 20 f4 20 |nt_label|.... . |
|00001030| 70 72 69 6e 74 73 20 74 | 68 65 20 6c 61 62 65 6c |prints t|he label|
|00001040| 0d 06 22 11 20 20 ea 20 | 72 65 73 70 6f 6e 73 65 |..". . |response|
|00001050| 24 0d 06 2c 16 20 20 72 | 65 73 70 6f 6e 73 65 24 |$..,. r|esponse$|
|00001060| 20 3d 20 22 6f 6b 22 0d | 06 36 2b 20 20 c8 95 20 | = "ok".|.6+ .. |
|00001070| 28 ac 20 a4 70 72 69 6e | 74 65 72 5f 6f 6e 20 80 |(. .prin|ter_on .|
|00001080| 20 72 65 73 70 6f 6e 73 | 65 24 20 3d 20 22 6f 6b | respons|e$ = "ok|
|00001090| 22 29 0d 06 40 34 20 20 | 20 20 72 65 73 70 6f 6e |")..@4 | respon|
|000010a0| 73 65 24 20 3d 20 a4 70 | 72 6f 62 6c 65 6d 28 b9 |se$ = .p|roblem(.|
|000010b0| 2c b9 2c 22 50 72 69 6e | 74 65 72 20 6f 66 66 20 |,.,"Prin|ter off |
|000010c0| 6c 69 6e 65 22 29 0d 06 | 4a 07 20 20 ce 0d 06 54 |line")..|J. ...T|
|000010d0| 1a 20 20 e7 20 72 65 73 | 70 6f 6e 73 65 24 20 3d |. . res|ponse$ =|
|000010e0| 20 22 6f 6b 22 20 8c 0d | 06 5e 16 20 20 20 20 f2 | "ok" ..|.^. .|
|000010f0| 70 72 69 6e 74 65 72 5f | 73 65 74 75 70 0d 06 68 |printer_|setup..h|
|00001100| 31 20 20 20 20 f2 70 72 | 69 6e 74 5f 6c 69 6e 65 |1 .pr|int_line|
|00001110| 28 22 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |("------|--------|
|00001120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 22 29 0d 06 |--------|----")..|
|00001130| 72 29 20 20 20 20 76 6f | 69 64 25 20 3d 20 a4 73 |r) vo|id% = .s|
|00001140| 65 6e 64 5f 70 72 69 6e | 74 65 72 28 22 45 78 70 |end_prin|ter("Exp|
|00001150| 61 6e 64 65 64 22 29 0d | 06 7c 2b 20 20 20 20 76 |anded").|.|+ v|
|00001160| 6f 69 64 25 20 3d 20 a4 | 73 65 6e 64 5f 70 72 69 |oid% = .|send_pri|
|00001170| 6e 74 65 72 28 22 44 6f | 75 62 6c 65 20 53 74 72 |nter("Do|uble Str|
|00001180| 22 29 0d 06 86 2e 20 20 | 20 20 f2 70 72 69 6e 74 |").... | .print|
|00001190| 5f 6c 69 6e 65 28 a4 72 | 65 61 64 69 63 6f 6e 28 |_line(.r|eadicon(|
|000011a0| 64 69 73 63 77 69 6e 64 | 6f 77 25 2c 31 34 29 29 |discwind|ow%,14))|
|000011b0| 0d 06 90 32 20 20 20 20 | 76 6f 69 64 25 20 3d 20 |...2 |void% = |
|000011c0| a4 73 65 6e 64 5f 70 72 | 69 6e 74 65 72 28 22 44 |.send_pr|inter("D|
|000011d0| 6f 75 62 6c 65 5f 53 74 | 72 69 6b 65 5f 6f 66 66 |ouble_St|rike_off|
|000011e0| 22 29 0d 06 9a 2d 20 20 | 20 20 76 6f 69 64 25 20 |")...- | void% |
|000011f0| 3d 20 a4 73 65 6e 64 5f | 70 72 69 6e 74 65 72 28 |= .send_|printer(|
|00001200| 22 45 78 70 61 6e 64 65 | 64 5f 6f 66 66 22 29 0d |"Expande|d_off").|
|00001210| 06 a4 31 20 20 20 20 f2 | 70 72 69 6e 74 5f 6c 69 |..1 .|print_li|
|00001220| 6e 65 28 22 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ne("----|--------|
|00001230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 22 29 |--------|------")|
|00001240| 0d 06 ae 16 20 20 20 20 | e3 20 69 63 6f 6e 25 3d |.... |. icon%=|
|00001250| 35 20 b8 20 31 33 0d 06 | b8 31 20 20 20 20 f2 70 |5 . 13..|.1 .p|
|00001260| 72 69 6e 74 5f 6c 69 6e | 65 28 a4 72 65 61 64 69 |rint_lin|e(.readi|
|00001270| 63 6f 6e 28 64 69 73 63 | 77 69 6e 64 6f 77 25 2c |con(disc|window%,|
|00001280| 69 63 6f 6e 25 29 29 0d | 06 c2 09 20 20 20 20 ed |icon%)).|... .|
|00001290| 0d 06 cc 2a 20 20 20 20 | 76 6f 69 64 25 20 3d 20 |...* |void% = |
|000012a0| a4 73 65 6e 64 5f 70 72 | 69 6e 74 65 72 28 22 53 |.send_pr|inter("S|
|000012b0| 75 62 73 63 72 69 70 74 | 22 29 0d 06 d6 2e 20 20 |ubscript|").... |
|000012c0| 20 20 f2 70 72 69 6e 74 | 5f 6c 69 6e 65 28 a4 72 | .print|_line(.r|
|000012d0| 65 61 64 69 63 6f 6e 28 | 64 69 73 63 77 69 6e 64 |eadicon(|discwind|
|000012e0| 6f 77 25 2c 31 34 29 29 | 0d 06 e0 2e 20 20 20 20 |ow%,14))|.... |
|000012f0| 76 6f 69 64 25 20 3d 20 | a4 73 65 6e 64 5f 70 72 |void% = |.send_pr|
|00001300| 69 6e 74 65 72 28 22 53 | 75 62 73 63 72 69 70 74 |inter("S|ubscript|
|00001310| 5f 6f 66 66 22 29 0d 06 | ea 2e 20 20 20 20 f2 70 |_off")..|.. .p|
|00001320| 72 69 6e 74 5f 6c 69 6e | 65 28 a4 72 65 61 64 69 |rint_lin|e(.readi|
|00001330| 63 6f 6e 28 64 69 73 63 | 77 69 6e 64 6f 77 25 2c |con(disc|window%,|
|00001340| 31 35 29 29 0d 06 f4 2e | 20 20 20 20 f2 70 72 69 |15))....| .pri|
|00001350| 6e 74 5f 6c 69 6e 65 28 | a4 72 65 61 64 69 63 6f |nt_line(|.readico|
|00001360| 6e 28 64 69 73 63 77 69 | 6e 64 6f 77 25 2c 31 36 |n(discwi|ndow%,16|
|00001370| 29 29 0d 06 fe 2e 20 20 | 20 20 f2 70 72 69 6e 74 |)).... | .print|
|00001380| 5f 6c 69 6e 65 28 a4 72 | 65 61 64 69 63 6f 6e 28 |_line(.r|eadicon(|
|00001390| 64 69 73 63 77 69 6e 64 | 6f 77 25 2c 31 37 29 29 |discwind|ow%,17))|
|000013a0| 0d 07 08 07 20 20 cc 0d | 07 12 14 20 20 20 20 f4 |.... ..|... .|
|000013b0| 20 64 6f 20 6e 6f 74 68 | 69 6e 67 0d 07 1c 07 20 | do noth|ing.... |
|000013c0| 20 cd 0d 07 26 05 e1 0d | 07 30 04 0d 07 3a 10 dd | ...&...|.0...:..|
|000013d0| f2 63 6c 65 61 72 69 63 | 6f 6e 73 0d 07 44 37 20 |.clearic|ons..D7 |
|000013e0| 20 f4 20 63 6c 65 61 72 | 73 20 61 6c 6c 20 69 63 | . clear|s all ic|
|000013f0| 6f 6e 73 20 69 6e 20 64 | 69 73 63 6c 61 62 65 6c |ons in d|isclabel|
|00001400| 20 61 6e 64 20 72 65 73 | 65 74 20 67 6c 6f 62 61 | and res|et globa|
|00001410| 6c 73 0d 07 4e 14 20 20 | e3 20 69 63 6f 6e 25 3d |ls..N. |. icon%=|
|00001420| 34 20 b8 20 31 34 0d 07 | 58 29 20 20 20 20 f2 75 |4 . 14..|X) .u|
|00001430| 70 64 61 74 65 69 63 6f | 6e 28 64 69 73 63 77 69 |pdateico|n(discwi|
|00001440| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 2c 22 22 29 0d |ndow%,ic|on%,"").|
|00001450| 07 62 07 20 20 ed 0d 07 | 6c 33 20 20 c8 99 20 57 |.b. ...|l3 .. W|
|00001460| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 25 |imp_Forc|eRedraw%|
|00001470| 2c 64 69 73 63 77 69 6e | 64 6f 77 25 2c 30 2c 2d |,discwin|dow%,0,-|
|00001480| 37 37 36 2c 35 35 30 2c | 30 0d 07 76 12 20 20 f2 |776,550,|0..v. .|
|00001490| 67 6c 6f 62 61 6c 5f 76 | 61 72 73 0d 07 80 05 e1 |global_v|ars.....|
|000014a0| 0d 07 8a 04 0d 07 94 3e | f4 2d 2d 2d 2d 2d 2d 2d |.......>|.-------|
|000014b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000014c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 41 70 70 6c 69 63 |--------|--Applic|
|000014d0| 61 74 69 6f 6e 20 6d 6f | 64 69 66 69 65 64 20 4c |ation mo|dified L|
|000014e0| 49 42 0d 07 9e 04 0d 07 | a8 11 dd f2 6d 65 73 73 |IB......|....mess|
|000014f0| 61 67 65 28 71 25 29 0d | 07 b2 23 20 20 f4 20 64 |age(q%).|..# . d|
|00001500| 65 61 6c 73 20 77 69 74 | 68 20 6d 65 73 73 61 67 |eals wit|h messag|
|00001510| 65 73 20 66 72 6f 6d 20 | 4f 53 0d 07 bc 1e 20 20 |es from |OS.... |
|00001520| f4 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 20 6d 6f |. applic|ation mo|
|00001530| 64 69 66 69 61 62 6c 65 | 0d 07 c6 1f 20 20 ea 20 |difiable|.... . |
|00001540| 73 69 7a 65 25 2c 20 66 | 69 6c 65 74 79 70 65 25 |size%, f|iletype%|
|00001550| 2c 20 66 69 6c 65 24 0d | 07 d0 35 f4 20 64 65 62 |, file$.|..5. deb|
|00001560| 75 67 24 20 3d 20 46 4e | 70 72 6f 62 6c 65 6d 28 |ug$ = FN|problem(|
|00001570| 54 52 55 45 2c 46 41 4c | 53 45 2c 22 44 65 62 75 |TRUE,FAL|SE,"Debu|
|00001580| 67 3a 20 6d 65 73 73 61 | 67 65 22 29 0d 07 da 16 |g: messa|ge")....|
|00001590| 20 20 c8 99 20 48 6f 75 | 72 67 6c 61 73 73 5f 4f | .. Hou|rglass_O|
|000015a0| 6e 25 0d 07 e4 17 20 20 | 4d 65 73 73 61 67 65 5f |n%.... |Message_|
|000015b0| 51 75 69 74 25 20 3d 20 | 30 0d 07 ee 1b 20 20 4d |Quit% = |0.... M|
|000015c0| 65 73 73 61 67 65 5f 44 | 61 74 61 53 61 76 65 25 |essage_D|ataSave%|
|000015d0| 20 3d 20 31 0d 07 f8 1e | 20 20 4d 65 73 73 61 67 | = 1....| Messag|
|000015e0| 65 5f 44 61 74 61 53 61 | 76 65 41 63 6b 25 20 3d |e_DataSa|veAck% =|
|000015f0| 20 32 0d 08 02 1b 20 20 | 4d 65 73 73 61 67 65 5f | 2.... |Message_|
|00001600| 44 61 74 61 4c 6f 61 64 | 25 20 3d 20 33 0d 08 0c |DataLoad|% = 3...|
|00001610| 1e 20 20 4d 65 73 73 61 | 67 65 5f 44 61 74 61 4c |. Messa|ge_DataL|
|00001620| 6f 61 64 41 63 6b 25 20 | 3d 20 34 0d 08 16 26 20 |oadAck% |= 4...& |
|00001630| 20 4d 65 73 73 61 67 65 | 5f 54 61 73 6b 49 6e 69 | Message|_TaskIni|
|00001640| 74 69 61 6c 69 73 65 25 | 20 3d 20 26 34 30 30 43 |tialise%| = &400C|
|00001650| 32 0d 08 20 10 20 20 c8 | 8e 20 71 25 21 31 36 20 |2.. . .|. q%!16 |
|00001660| ca 0d 08 2a 2e 20 20 20 | 20 c9 20 4d 65 73 73 61 |...*. | . Messa|
|00001670| 67 65 5f 51 75 69 74 25 | 20 3a 20 c8 99 20 57 69 |ge_Quit%| : .. Wi|
|00001680| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 25 3a e0 0d |mp_Close|Down%:..|
|00001690| 08 34 1d 20 20 20 20 c9 | 20 4d 65 73 73 61 67 65 |.4. .| Message|
|000016a0| 5f 44 61 74 61 53 61 76 | 65 25 20 3a 0d 08 3e 17 |_DataSav|e% :..>.|
|000016b0| 20 20 20 20 20 20 73 69 | 7a 65 25 20 3d 20 71 25 | si|ze% = q%|
|000016c0| 21 33 36 0d 08 48 1b 20 | 20 20 20 20 20 66 69 6c |!36..H. | fil|
|000016d0| 65 74 79 70 65 25 20 3d | 20 71 25 21 34 30 0d 08 |etype% =| q%!40..|
|000016e0| 52 20 20 20 20 20 20 20 | 66 69 6c 65 24 20 3d 20 |R |file$ = |
|000016f0| a4 73 74 72 69 6e 67 28 | 71 25 2b 34 34 29 0d 08 |.string(|q%+44)..|
|00001700| 5c 15 20 20 20 20 20 20 | 71 25 21 30 20 20 3d 20 |\. |q%!0 = |
|00001710| 31 30 30 0d 08 66 16 20 | 20 20 20 20 20 71 25 21 |100..f. | q%!|
|00001720| 31 32 20 3d 20 71 25 21 | 38 0d 08 70 26 20 20 20 |12 = q%!|8..p& |
|00001730| 20 20 20 71 25 21 31 36 | 20 3d 20 4d 65 73 73 61 | q%!16| = Messa|
|00001740| 67 65 5f 44 61 74 61 53 | 61 76 65 41 63 6b 25 0d |ge_DataS|aveAck%.|
|00001750| 08 7a 42 20 20 20 20 20 | 20 71 25 21 33 36 20 3d |.zB | q%!36 =|
|00001760| 20 2d 31 20 3a f4 20 74 | 68 69 73 20 74 65 6c 6c | -1 :. t|his tell|
|00001770| 73 20 73 61 76 69 6e 67 | 20 61 70 70 20 6e 6f 74 |s saving| app not|
|00001780| 20 74 6f 20 6d 61 72 6b | 20 61 73 20 73 61 76 65 | to mark| as save|
|00001790| 64 0d 08 84 27 20 20 20 | 20 20 20 66 69 6c 65 24 |d...' | file$|
|000017a0| 20 3d 20 22 3c 57 69 6d | 70 24 53 63 72 61 70 3e | = "<Wim|p$Scrap>|
|000017b0| 22 20 2b 20 bd 28 30 29 | 0d 08 8e 1a 20 20 20 20 |" + .(0)|.... |
|000017c0| 20 20 24 28 71 25 2b 34 | 34 29 20 3d 20 66 69 6c | $(q%+4|4) = fil|
|000017d0| 65 24 0d 08 98 29 20 20 | 20 20 20 20 c8 99 20 57 |e$...) | .. W|
|000017e0| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 25 |imp_Send|Message%|
|000017f0| 2c 31 38 2c 71 25 2c 71 | 25 21 34 0d 08 a2 1d 20 |,18,q%,q|%!4.... |
|00001800| 20 20 20 c9 20 4d 65 73 | 73 61 67 65 5f 44 61 74 | . Mes|sage_Dat|
|00001810| 61 4c 6f 61 64 25 20 3a | 0d 08 ac 17 20 20 20 20 |aLoad% :|.... |
|00001820| 20 20 73 69 7a 65 25 20 | 3d 20 71 25 21 33 36 0d | size% |= q%!36.|
|00001830| 08 b6 1b 20 20 20 20 20 | 20 66 69 6c 65 74 79 70 |... | filetyp|
|00001840| 65 25 20 3d 20 71 25 21 | 34 30 0d 08 c0 20 20 20 |e% = q%!|40... |
|00001850| 20 20 20 20 66 69 6c 65 | 24 20 3d 20 a4 73 74 72 | file|$ = .str|
|00001860| 69 6e 67 28 71 25 2b 34 | 34 29 0d 08 ca 18 20 20 |ing(q%+4|4).... |
|00001870| 20 20 20 20 f2 64 61 74 | 61 5f 6c 6f 61 64 28 71 | .dat|a_load(q|
|00001880| 25 29 0d 08 d4 24 20 20 | 20 20 20 20 e7 20 66 69 |%)...$ | . fi|
|00001890| 6c 65 24 20 3d 20 22 3c | 57 69 6d 70 24 53 63 72 |le$ = "<|Wimp$Scr|
|000018a0| 61 70 3e 22 20 8c 0d 08 | de 2e 20 20 20 20 20 20 |ap>" ...|.. |
|000018b0| 20 20 ff 28 22 72 65 6d | 6f 76 65 20 22 2b 66 69 | .("rem|ove "+fi|
|000018c0| 6c 65 24 2b 22 20 7b 20 | 3e 20 6e 75 6c 6c 3a 20 |le$+" { |> null: |
|000018d0| 7d 22 20 29 0d 08 e8 0b | 20 20 20 20 20 20 cd 0d |}" )....| ..|
|000018e0| 08 f2 16 20 20 20 20 20 | 20 71 25 21 31 32 20 3d |... | q%!12 =|
|000018f0| 20 71 25 21 38 0d 08 fc | 26 20 20 20 20 20 20 71 | q%!8...|& q|
|00001900| 25 21 31 36 20 3d 20 4d | 65 73 73 61 67 65 5f 44 |%!16 = M|essage_D|
|00001910| 61 74 61 4c 6f 61 64 41 | 63 6b 25 0d 09 06 29 20 |ataLoadA|ck%...) |
|00001920| 20 20 20 20 20 c8 99 20 | 57 69 6d 70 5f 53 65 6e | .. |Wimp_Sen|
|00001930| 64 4d 65 73 73 61 67 65 | 25 2c 31 37 2c 71 25 2c |dMessage|%,17,q%,|
|00001940| 71 25 21 34 0d 09 10 23 | 20 20 20 20 c9 20 4d 65 |q%!4...#| . Me|
|00001950| 73 73 61 67 65 5f 54 61 | 73 6b 49 6e 69 74 69 61 |ssage_Ta|skInitia|
|00001960| 6c 69 73 65 25 20 3a 0d | 09 1a 3f 20 20 20 20 20 |lise% :.|..? |
|00001970| 20 e7 20 a4 73 74 72 69 | 6e 67 28 71 25 2b 32 38 | . .stri|ng(q%+28|
|00001980| 29 3d 70 72 6f 67 72 61 | 6d 5f 6e 61 6d 65 24 20 |)=progra|m_name$ |
|00001990| 80 20 71 25 21 34 20 3c | 3e 20 74 68 69 73 5f 74 |. q%!4 <|> this_t|
|000019a0| 61 73 6b 25 20 8c 0d 09 | 24 13 20 20 20 20 20 20 |ask% ...|$. |
|000019b0| 20 20 71 75 69 74 25 3d | b9 0d 09 2e 0b 20 20 20 | quit%=|..... |
|000019c0| 20 20 20 cc 0d 09 38 0b | 20 20 20 20 20 20 cd 0d | ...8.| ..|
|000019d0| 09 42 07 20 20 cb 0d 09 | 4c 17 20 20 c8 99 20 48 |.B. ...|L. .. H|
|000019e0| 6f 75 72 67 6c 61 73 73 | 5f 4f 66 66 25 0d 09 56 |ourglass|_Off%..V|
|000019f0| 05 e1 0d 09 60 04 0d 09 | 6a 19 dd f2 64 61 74 61 |....`...|j...data|
|00001a00| 5f 6c 6f 61 64 28 61 64 | 64 72 65 73 73 25 29 0d |_load(ad|dress%).|
|00001a10| 09 74 20 20 20 f4 20 64 | 65 61 6c 20 77 69 74 68 |.t . d|eal with|
|00001a20| 20 72 65 63 69 65 76 69 | 6e 67 20 64 61 74 61 0d | recievi|ng data.|
|00001a30| 09 7e 1e 20 20 f4 20 41 | 70 70 6c 69 63 61 74 69 |.~. . A|pplicati|
|00001a40| 6f 6e 20 6d 6f 64 69 66 | 69 61 62 6c 65 0d 09 88 |on modif|iable...|
|00001a50| 1f 20 20 ea 20 73 69 7a | 65 25 2c 20 66 69 6c 65 |. . siz|e%, file|
|00001a60| 74 79 70 65 25 2c 20 70 | 61 74 68 24 0d 09 92 35 |type%, p|ath$...5|
|00001a70| f4 20 64 65 62 75 67 24 | 20 3d 20 46 4e 70 72 6f |. debug$| = FNpro|
|00001a80| 62 6c 65 6d 28 54 52 55 | 45 2c 46 41 4c 53 45 2c |blem(TRU|E,FALSE,|
|00001a90| 22 44 65 62 75 67 3a 64 | 61 74 61 6c 6f 61 64 22 |"Debug:d|ataload"|
|00001aa0| 29 0d 09 9c 16 20 20 c8 | 99 20 48 6f 75 72 67 6c |).... .|. Hourgl|
|00001ab0| 61 73 73 5f 4f 6e 25 0d | 09 a6 19 20 20 73 69 7a |ass_On%.|... siz|
|00001ac0| 65 25 20 3d 20 61 64 64 | 72 65 73 73 25 21 33 36 |e% = add|ress%!36|
|00001ad0| 0d 09 b0 1d 20 20 66 69 | 6c 65 74 79 70 65 25 20 |.... fi|letype% |
|00001ae0| 3d 20 61 64 64 72 65 73 | 73 25 21 34 30 0d 09 ba |= addres|s%!40...|
|00001af0| 22 20 20 70 61 74 68 24 | 20 3d 20 a4 73 74 72 69 |" path$| = .stri|
|00001b00| 6e 67 28 61 64 64 72 65 | 73 73 25 2b 34 34 29 0d |ng(addre|ss%+44).|
|00001b10| 09 c4 1c 20 20 61 64 64 | 72 65 73 73 25 21 31 32 |... add|ress%!12|
|00001b20| 3d 61 64 64 72 65 73 73 | 25 21 38 0d 09 ce 13 20 |=address|%!8.... |
|00001b30| 20 61 64 64 72 65 73 73 | 25 21 31 36 3d 34 0d 09 | address|%!16=4..|
|00001b40| d8 31 20 20 c8 99 20 57 | 69 6d 70 5f 53 65 6e 64 |.1 .. W|imp_Send|
|00001b50| 4d 65 73 73 61 67 65 25 | 2c 31 37 2c 61 64 64 72 |Message%|,17,addr|
|00001b60| 65 73 73 25 2c 61 64 64 | 72 65 73 73 25 21 34 0d |ess%,add|ress%!4.|
|00001b70| 09 e2 1e 20 20 6f 6c 64 | 64 69 73 63 6e 61 6d 65 |... old|discname|
|00001b80| 24 20 3d 20 64 69 73 63 | 6e 61 6d 65 24 0d 09 ec |$ = disc|name$...|
|00001b90| 22 20 20 64 69 73 63 6e | 61 6d 65 24 20 3d 20 a4 |" discn|ame$ = .|
|00001ba0| 64 69 73 63 6e 61 6d 65 | 28 70 61 74 68 24 29 0d |discname|(path$).|
|00001bb0| 09 f6 18 20 20 77 69 64 | 65 64 69 73 63 6e 61 6d |... wid|ediscnam|
|00001bc0| 65 24 20 3d 20 22 22 0d | 0a 00 1e 20 20 e3 20 63 |e$ = "".|... . c|
|00001bd0| 68 61 72 25 3d 31 20 b8 | 20 a9 28 64 69 73 63 6e |har%=1 .| .(discn|
|00001be0| 61 6d 65 24 29 0d 0a 0a | 43 20 20 20 20 77 69 64 |ame$)...|C wid|
|00001bf0| 65 64 69 73 63 6e 61 6d | 65 24 20 3d 20 77 69 64 |ediscnam|e$ = wid|
|00001c00| 65 64 69 73 63 6e 61 6d | 65 24 20 2b 20 c1 64 69 |ediscnam|e$ + .di|
|00001c10| 73 63 6e 61 6d 65 24 2c | 20 63 68 61 72 25 2c 20 |scname$,| char%, |
|00001c20| 31 29 20 2b 20 22 20 22 | 0d 0a 14 07 20 20 ed 0d |1) + " "|.... ..|
|00001c30| 0a 1e 17 20 20 c8 8e 20 | 6f 6c 64 64 69 73 63 6e |... .. |olddiscn|
|00001c40| 61 6d 65 24 20 ca 0d 0a | 28 0c 20 20 20 20 c9 20 |ame$ ...|(. . |
|00001c50| 22 22 0d 0a 32 16 20 20 | 20 20 20 20 f4 20 64 6f |""..2. | . do|
|00001c60| 20 6e 6f 74 68 69 6e 67 | 0d 0a 3c 13 20 20 20 20 | nothing|..<. |
|00001c70| c9 20 64 69 73 63 6e 61 | 6d 65 24 0d 0a 46 16 20 |. discna|me$..F. |
|00001c80| 20 20 20 20 20 f4 20 64 | 6f 20 6e 6f 74 68 69 6e | . d|o nothin|
|00001c90| 67 0d 0a 50 09 20 20 20 | 20 7f 0d 0a 5a 65 20 20 |g..P. | ...Ze |
|00001ca0| 20 20 20 20 76 6f 69 64 | 24 20 3d 20 a4 70 72 6f | void|$ = .pro|
|00001cb0| 62 6c 65 6d 28 b9 2c a3 | 2c 22 57 61 72 6e 69 6e |blem(.,.|,"Warnin|
|00001cc0| 67 20 6e 6f 74 20 61 20 | 66 69 6c 65 20 6f 6e 20 |g not a |file on |
|00001cd0| 22 2b 6f 6c 64 64 69 73 | 63 6e 61 6d 65 24 2b 22 |"+olddis|cname$+"|
|00001ce0| 2e 20 54 68 69 73 20 66 | 69 6c 65 20 77 61 73 20 |. This f|ile was |
|00001cf0| 6f 6e 20 22 2b 64 69 73 | 63 6e 61 6d 65 24 29 0d |on "+dis|cname$).|
|00001d00| 0a 64 07 20 20 cb 0d 0a | 6e 1a 20 20 66 69 6c 65 |.d. ...|n. file|
|00001d10| 24 20 3d 20 a4 66 69 6c | 65 28 70 61 74 68 24 29 |$ = .fil|e(path$)|
|00001d20| 0d 0a 78 0d 20 20 64 6f | 6e 65 25 3d a3 0d 0a 82 |..x. do|ne%=....|
|00001d30| 0d 20 20 69 63 6f 6e 25 | 3d 35 0d 0a 8c 07 20 20 |. icon%|=5.... |
|00001d40| f5 0d 0a 96 34 20 20 20 | 20 6c 69 6e 65 24 20 3d |....4 | line$ =|
|00001d50| 20 a4 72 65 61 64 69 63 | 6f 6e 28 64 69 73 63 77 | .readic|on(discw|
|00001d60| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 29 20 2b 20 |indow%,i|con%) + |
|00001d70| 66 69 6c 65 24 0d 0a a0 | 2c 20 20 64 65 62 75 67 |file$...|, debug|
|00001d80| 24 20 3d 20 a4 70 72 6f | 62 6c 65 6d 28 b9 2c a3 |$ = .pro|blem(.,.|
|00001d90| 2c 22 44 65 62 75 67 3a | 20 22 2b 6c 69 6e 65 24 |,"Debug:| "+line$|
|00001da0| 29 0d 0a aa 19 20 20 20 | 20 e7 20 a9 28 6c 69 6e |).... | . .(lin|
|00001db0| 65 24 29 20 3c 20 32 37 | 20 8c 0d 0a b4 39 20 20 |e$) < 27| ....9 |
|00001dc0| 20 20 20 20 f2 75 70 64 | 61 74 65 69 63 6f 6e 28 | .upd|ateicon(|
|00001dd0| 64 69 73 63 77 69 6e 64 | 6f 77 25 2c 69 63 6f 6e |discwind|ow%,icon|
|00001de0| 25 2c c0 a4 70 61 64 28 | 6c 69 6e 65 24 29 2c 32 |%,..pad(|line$),2|
|00001df0| 36 29 29 0d 0a be 32 20 | 20 20 20 20 20 f2 75 70 |6))...2 | .up|
|00001e00| 64 61 74 65 69 63 6f 6e | 28 64 69 73 63 77 69 6e |dateicon|(discwin|
|00001e10| 64 6f 77 25 2c 34 2c 77 | 69 64 65 64 69 73 63 6e |dow%,4,w|idediscn|
|00001e20| 61 6d 65 24 29 0d 0a c8 | 2f 20 20 20 20 20 20 f2 |ame$)...|/ .|
|00001e30| 75 70 64 61 74 65 69 63 | 6f 6e 28 64 69 73 63 77 |updateic|on(discw|
|00001e40| 69 6e 64 6f 77 25 2c 31 | 34 2c 64 69 73 63 6e 61 |indow%,1|4,discna|
|00001e50| 6d 65 24 29 0d 0a d2 37 | 20 20 20 20 20 20 c8 99 |me$)...7| ..|
|00001e60| 20 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 | Wimp_Fo|rceRedra|
|00001e70| 77 25 2c 64 69 73 63 77 | 69 6e 64 6f 77 25 2c 30 |w%,discw|indow%,0|
|00001e80| 2c 2d 37 37 36 2c 35 35 | 30 2c 30 0d 0a dc 11 20 |,-776,55|0,0.... |
|00001e90| 20 20 20 20 20 64 6f 6e | 65 25 3d b9 0d 0a e6 09 | don|e%=.....|
|00001ea0| 20 20 20 20 cc 0d 0a f0 | 14 20 20 20 20 20 20 69 | ....|. i|
|00001eb0| 63 6f 6e 25 20 2b 3d 20 | 31 0d 0a fa 18 20 20 20 |con% += |1.... |
|00001ec0| 20 20 20 e7 20 69 63 6f | 6e 25 20 3e 20 31 33 20 | . ico|n% > 13 |
|00001ed0| 8c 0d 0b 04 47 20 20 20 | 20 20 20 20 20 76 6f 69 |....G | voi|
|00001ee0| 64 24 20 3d 20 a4 70 72 | 6f 62 6c 65 6d 28 b9 2c |d$ = .pr|oblem(.,|
|00001ef0| a3 2c 22 54 6f 6f 20 6d | 61 6e 79 20 6e 61 6d 65 |.,"Too m|any name|
|00001f00| 73 20 74 6f 20 66 69 74 | 20 6f 6e 20 74 68 69 73 |s to fit| on this|
|00001f10| 20 6c 61 62 65 6c 22 29 | 0d 0b 0e 13 20 20 20 20 | label")|.... |
|00001f20| 20 20 20 20 64 6f 6e 65 | 25 3d b9 0d 0b 18 0b 20 | done|%=..... |
|00001f30| 20 20 20 20 20 cd 0d 0b | 22 09 20 20 20 20 cd 0d | ...|". ..|
|00001f40| 0b 2c 0d 20 20 fd 20 64 | 6f 6e 65 25 0d 0b 36 17 |.,. . d|one%..6.|
|00001f50| 20 20 c8 99 20 48 6f 75 | 72 67 6c 61 73 73 5f 4f | .. Hou|rglass_O|
|00001f60| 66 66 25 0d 0b 40 05 e1 | 0d 0b 4a 04 0d 0b 54 15 |ff%..@..|..J...T.|
|00001f70| dd f2 6d 6f 75 73 65 5f | 63 6c 69 63 6b 28 71 25 |..mouse_|click(q%|
|00001f80| 29 0d 0b 5e 1f 20 20 f4 | 20 72 65 73 70 6f 6e 64 |)..^. .| respond|
|00001f90| 73 20 74 6f 20 6d 6f 75 | 73 65 20 63 6c 69 63 6b |s to mou|se click|
|00001fa0| 0d 0b 68 1d 20 20 f4 20 | 61 70 70 6c 69 63 61 74 |..h. . |applicat|
|00001fb0| 69 6f 6e 20 64 65 70 65 | 6e 64 61 6e 74 0d 0b 72 |ion depe|ndant..r|
|00001fc0| 28 20 20 ea 20 69 63 6f | 6e 62 61 72 25 2c 20 77 |( . ico|nbar%, w|
|00001fd0| 69 6e 64 6f 77 25 2c 20 | 6d 78 25 2c 20 6d 79 25 |indow%, |mx%, my%|
|00001fe0| 2c 20 6d 62 25 0d 0b 7c | 13 20 20 69 63 6f 6e 62 |, mb%..||. iconb|
|00001ff0| 61 72 25 20 3d 20 2d 32 | 0d 0b 86 0e 20 20 6d 78 |ar% = -2|.... mx|
|00002000| 25 3d 71 25 21 30 0d 0b | 90 0e 20 20 6d 79 25 3d |%=q%!0..|.. my%=|
|00002010| 71 25 21 34 0d 0b 9a 0e | 20 20 6d 62 25 3d 71 25 |q%!4....| mb%=q%|
|00002020| 21 38 0d 0b a4 13 20 20 | 77 69 6e 64 6f 77 25 3d |!8.... |window%=|
|00002030| 71 25 21 31 32 0d 0b ae | 12 20 20 c8 8e 20 77 69 |q%!12...|. .. wi|
|00002040| 6e 64 6f 77 25 20 ca 0d | 0b b8 12 20 20 20 20 c9 |ndow% ..|... .|
|00002050| 20 69 63 6f 6e 62 61 72 | 25 0d 0b c2 12 20 20 20 | iconbar|%.... |
|00002060| 20 20 20 c8 8e 20 6d 62 | 25 20 ca 0d 0b cc 0f 20 | .. mb|% ..... |
|00002070| 20 20 20 20 20 20 20 c9 | 20 32 0d 0b d6 5b 20 20 | .| 2...[ |
|00002080| 20 20 20 20 20 20 20 20 | c8 99 20 57 69 6d 70 5f | |.. Wimp_|
|00002090| 43 72 65 61 74 65 4d 65 | 6e 75 25 2c 2c 6d 61 69 |CreateMe|nu%,,mai|
|000020a0| 6e 6d 65 6e 75 25 2c 6d | 78 25 2d 6d 61 69 6e 6d |nmenu%,m|x%-mainm|
|000020b0| 65 6e 75 25 21 31 36 2f | 32 2d 32 34 2c 39 32 2b |enu%!16/|2-24,92+|
|000020c0| 28 34 34 2a 6d 61 69 6e | 6d 65 6e 75 69 74 65 6d |(44*main|menuitem|
|000020d0| 73 25 2b 31 29 0d 0b e0 | 0f 20 20 20 20 20 20 20 |s%+1)...|. |
|000020e0| 20 c9 20 34 0d 0b ea 2c | 20 20 20 20 20 20 20 20 | . 4...,| |
|000020f0| 20 20 f2 6f 70 65 6e 63 | 6c 6f 73 65 64 77 69 6e | .openc|losedwin|
|00002100| 64 6f 77 28 64 69 73 63 | 77 69 6e 64 6f 77 25 29 |dow(disc|window%)|
|00002110| 0d 0b f4 0b 20 20 20 20 | 20 20 cb 0d 0b fe 15 20 |.... | ..... |
|00002120| 20 20 20 c9 20 64 69 73 | 63 77 69 6e 64 6f 77 25 | . dis|cwindow%|
|00002130| 0d 0c 08 12 20 20 20 20 | 20 20 c8 8e 20 6d 62 25 |.... | .. mb%|
|00002140| 20 ca 0d 0c 12 0f 20 20 | 20 20 20 20 20 20 c9 20 | ..... | . |
|00002150| 32 0d 0c 1c 3c 20 20 20 | 20 20 20 20 20 20 20 c8 |2...< | .|
|00002160| 99 20 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |. Wimp_C|reateMen|
|00002170| 75 25 2c 2c 6d 61 69 6e | 6d 65 6e 75 25 2c 6d 78 |u%,,main|menu%,mx|
|00002180| 25 2d 31 35 30 2c 6d 79 | 25 2b 31 39 30 0d 0c 26 |%-150,my|%+190..&|
|00002190| 0b 20 20 20 20 20 20 cb | 0d 0c 30 07 20 20 cb 0d |. .|..0. ..|
|000021a0| 0c 3a 05 e1 0d 0c 44 04 | 0d 0c 4e 14 dd f2 64 65 |.:....D.|..N...de|
|000021b0| 63 6f 64 65 6d 65 6e 75 | 28 71 25 29 0d 0c 58 1c |codemenu|(q%)..X.|
|000021c0| 20 20 f4 20 61 70 70 6c | 69 63 61 74 69 6f 6e 20 | . appl|ication |
|000021d0| 6d 6f 64 69 66 69 65 64 | 0d 0c 62 1d 20 20 ea 20 |modified|..b. . |
|000021e0| 73 65 6c 65 63 74 69 6f | 6e 25 2c 73 65 6c 73 63 |selectio|n%,selsc|
|000021f0| 74 69 6f 6e 24 0d 0c 6c | 16 20 20 de 20 73 65 6c |tion$..l|. . sel|
|00002200| 65 63 74 69 6f 6e 25 20 | 32 35 35 0d 0c 76 33 20 |ection% |255..v3 |
|00002210| 20 c8 99 20 57 69 6d 70 | 5f 44 65 63 6f 64 65 4d | .. Wimp|_DecodeM|
|00002220| 65 6e 75 25 2c 30 2c 6d | 61 69 6e 6d 65 6e 75 25 |enu%,0,m|ainmenu%|
|00002230| 2c 71 25 2c 73 65 6c 65 | 63 74 69 6f 6e 25 0d 0c |,q%,sele|ction%..|
|00002240| 80 1e 20 20 73 65 6c 65 | 63 74 69 6f 6e 24 20 3d |.. sele|ction$ =|
|00002250| 20 24 73 65 6c 65 63 74 | 69 6f 6e 25 0d 0c 8a 15 | $select|ion%....|
|00002260| 20 20 c8 8e 20 73 65 6c | 65 63 74 69 6f 6e 24 20 | .. sel|ection$ |
|00002270| ca 0d 0c 94 10 20 20 20 | 20 c9 20 22 49 6e 66 6f |..... | . "Info|
|00002280| 22 0d 0c 9e 16 20 20 20 | 20 20 20 f4 20 64 6f 20 |".... | . do |
|00002290| 6e 6f 74 68 69 6e 67 0d | 0c a8 10 20 20 20 20 c9 |nothing.|... .|
|000022a0| 20 22 48 65 6c 70 22 0d | 0c b2 30 20 20 20 20 20 | "Help".|..0 |
|000022b0| 20 f2 68 65 6c 70 28 70 | 72 6f 67 5f 64 69 72 24 | .help(p|rog_dir$|
|000022c0| 2c 70 72 6f 67 72 61 6d | 5f 6e 61 6d 65 24 2b 22 |,program|_name$+"|
|000022d0| 20 48 65 6c 70 22 29 0d | 0c bc 18 20 20 20 20 c9 | Help").|... .|
|000022e0| 20 22 53 61 76 65 20 43 | 6f 6e 66 69 67 2e 22 0d | "Save C|onfig.".|
|000022f0| 0c c6 16 20 20 20 20 20 | 20 f2 73 61 76 65 5f 63 |... | .save_c|
|00002300| 6f 6e 66 69 67 0d 0c d0 | 13 20 20 20 20 c9 20 22 |onfig...|. . "|
|00002310| 50 72 69 6e 74 65 72 22 | 0d 0c da 16 20 20 20 20 |Printer"|.... |
|00002320| 20 20 f4 20 64 6f 20 6e | 6f 74 68 69 6e 67 0d 0c | . do n|othing..|
|00002330| e4 1c 20 20 20 20 c9 20 | 22 50 72 69 6e 74 65 72 |.. . |"Printer|
|00002340| 2e 45 70 73 6f 6e 2d 46 | 58 22 0d 0c ee 22 20 20 |.Epson-F|X"..." |
|00002350| 20 20 20 20 f2 74 69 63 | 6b 28 50 72 69 6e 74 65 | .tic|k(Printe|
|00002360| 72 6d 65 6e 75 25 2c 71 | 25 21 34 29 0d 0c f8 35 |rmenu%,q|%!4)...5|
|00002370| 20 20 20 20 20 20 f2 6e | 6f 74 69 63 6b 28 50 72 | .n|otick(Pr|
|00002380| 69 6e 74 65 72 6d 65 6e | 75 25 2c 31 29 3a 70 72 |intermen|u%,1):pr|
|00002390| 69 6e 74 65 72 24 3d 22 | 45 70 73 6f 6e 2d 46 58 |inter$="|Epson-FX|
|000023a0| 22 0d 0d 02 16 20 20 20 | 20 20 20 f2 6f 70 74 69 |".... | .opti|
|000023b0| 6f 6e 73 6d 65 6e 75 0d | 0d 0c 1d 20 20 20 20 c9 |onsmenu.|... .|
|000023c0| 20 22 50 72 69 6e 74 65 | 72 2e 53 74 61 72 2d 4c | "Printe|r.Star-L|
|000023d0| 43 31 30 22 0d 0d 16 22 | 20 20 20 20 20 20 f2 74 |C10"..."| .t|
|000023e0| 69 63 6b 28 50 72 69 6e | 74 65 72 6d 65 6e 75 25 |ick(Prin|termenu%|
|000023f0| 2c 71 25 21 34 29 0d 0d | 20 36 20 20 20 20 20 20 |,q%!4)..| 6 |
|00002400| f2 6e 6f 74 69 63 6b 28 | 50 72 69 6e 74 65 72 6d |.notick(|Printerm|
|00002410| 65 6e 75 25 2c 30 29 3a | 70 72 69 6e 74 65 72 24 |enu%,0):|printer$|
|00002420| 3d 22 53 74 61 72 2d 4c | 43 31 30 22 0d 0d 2a 16 |="Star-L|C10"..*.|
|00002430| 20 20 20 20 20 20 f2 6f | 70 74 69 6f 6e 73 6d 65 | .o|ptionsme|
|00002440| 6e 75 0d 0d 34 13 20 20 | 20 20 c9 20 22 4f 70 74 |nu..4. | . "Opt|
|00002450| 69 6f 6e 73 22 0d 0d 3e | 16 20 20 20 20 20 20 f4 |ions"..>|. .|
|00002460| 20 64 6f 20 6e 6f 74 68 | 69 6e 67 0d 0d 48 19 20 | do noth|ing..H. |
|00002470| 20 20 20 c9 20 22 4f 70 | 74 69 6f 6e 73 2e 44 72 | . "Op|tions.Dr|
|00002480| 61 66 74 22 0d 0d 52 15 | 20 20 20 20 20 20 f2 63 |aft"..R.| .c|
|00002490| 6c 65 61 72 73 74 79 6c | 65 0d 0d 5c 1f 20 20 20 |learstyl|e..\. |
|000024a0| 20 20 20 f2 74 69 63 6b | 28 4f 70 74 69 6f 6e 73 | .tick|(Options|
|000024b0| 6d 65 6e 75 25 2c 30 29 | 0d 0d 66 1b 20 20 20 20 |menu%,0)|..f. |
|000024c0| c9 20 22 4f 70 74 69 6f | 6e 73 2e 43 6f 75 72 69 |. "Optio|ns.Couri|
|000024d0| 65 72 22 0d 0d 70 15 20 | 20 20 20 20 20 f2 63 6c |er"..p. | .cl|
|000024e0| 65 61 72 73 74 79 6c 65 | 0d 0d 7a 1f 20 20 20 20 |earstyle|..z. |
|000024f0| 20 20 f2 74 69 63 6b 28 | 4f 70 74 69 6f 6e 73 6d | .tick(|Optionsm|
|00002500| 65 6e 75 25 2c 31 29 0d | 0d 84 1a 20 20 20 20 c9 |enu%,1).|... .|
|00002510| 20 22 4f 70 74 69 6f 6e | 73 2e 4f 72 61 74 6f 72 | "Option|s.Orator|
|00002520| 22 0d 0d 8e 15 20 20 20 | 20 20 20 f2 63 6c 65 61 |".... | .clea|
|00002530| 72 73 74 79 6c 65 0d 0d | 98 1f 20 20 20 20 20 20 |rstyle..|.. |
|00002540| f2 74 69 63 6b 28 4f 70 | 74 69 6f 6e 73 6d 65 6e |.tick(Op|tionsmen|
|00002550| 75 25 2c 32 29 0d 0d a2 | 1d 20 20 20 20 c9 20 22 |u%,2)...|. . "|
|00002560| 4f 70 74 69 6f 6e 73 2e | 4f 72 61 74 6f 72 20 53 |Options.|Orator S|
|00002570| 43 22 0d 0d ac 15 20 20 | 20 20 20 20 f2 63 6c 65 |C".... | .cle|
|00002580| 61 72 73 74 79 6c 65 0d | 0d b6 1f 20 20 20 20 20 |arstyle.|... |
|00002590| 20 f2 74 69 63 6b 28 4f | 70 74 69 6f 6e 73 6d 65 | .tick(O|ptionsme|
|000025a0| 6e 75 25 2c 33 29 0d 0d | c0 1e 20 20 20 20 c9 20 |nu%,3)..|.. . |
|000025b0| 22 4f 70 74 69 6f 6e 73 | 2e 53 61 6e 73 20 53 65 |"Options|.Sans Se|
|000025c0| 72 69 66 22 0d 0d ca 15 | 20 20 20 20 20 20 f2 63 |rif"....| .c|
|000025d0| 6c 65 61 72 73 74 79 6c | 65 0d 0d d4 1f 20 20 20 |learstyl|e.... |
|000025e0| 20 20 20 f2 74 69 63 6b | 28 4f 70 74 69 6f 6e 73 | .tick|(Options|
|000025f0| 6d 65 6e 75 25 2c 34 29 | 0d 0d de 1a 20 20 20 20 |menu%,4)|.... |
|00002600| c9 20 22 4f 70 74 69 6f | 6e 73 2e 49 74 61 6c 69 |. "Optio|ns.Itali|
|00002610| 63 22 0d 0d e8 1f 20 20 | 20 20 20 20 f2 74 69 63 |c".... | .tic|
|00002620| 6b 28 4f 70 74 69 6f 6e | 73 6d 65 6e 75 25 2c 35 |k(Option|smenu%,5|
|00002630| 29 0d 0d f2 1e 20 20 20 | 20 c9 20 22 4f 70 74 69 |).... | . "Opti|
|00002640| 6f 6e 73 2e 44 6f 75 62 | 6c 65 20 53 74 72 22 0d |ons.Doub|le Str".|
|00002650| 0d fc 1f 20 20 20 20 20 | 20 f2 74 69 63 6b 28 4f |... | .tick(O|
|00002660| 70 74 69 6f 6e 73 6d 65 | 6e 75 25 2c 36 29 0d 0e |ptionsme|nu%,6)..|
|00002670| 06 1e 20 20 20 20 c9 20 | 22 4f 70 74 69 6f 6e 73 |.. . |"Options|
|00002680| 2e 45 6d 70 68 61 73 69 | 7a 65 64 22 0d 0e 10 1f |.Emphasi|zed"....|
|00002690| 20 20 20 20 20 20 f2 74 | 69 63 6b 28 4f 70 74 69 | .t|ick(Opti|
|000026a0| 6f 6e 73 6d 65 6e 75 25 | 2c 37 29 0d 0e 1a 11 20 |onsmenu%|,7).... |
|000026b0| 20 20 20 c9 20 22 50 72 | 69 6e 74 22 0d 0e 24 16 | . "Pr|int"..$.|
|000026c0| 20 20 20 20 20 20 f2 70 | 72 69 6e 74 5f 6c 61 62 | .p|rint_lab|
|000026d0| 65 6c 0d 0e 2e 11 20 20 | 20 20 c9 20 22 43 6c 65 |el.... | . "Cle|
|000026e0| 61 72 22 0d 0e 38 15 20 | 20 20 20 20 20 f2 63 6c |ar"..8. | .cl|
|000026f0| 65 61 72 69 63 6f 6e 73 | 0d 0e 42 10 20 20 20 20 |earicons|..B. |
|00002700| c9 20 22 51 75 69 74 22 | 0d 0e 4c 1e 20 20 20 20 |. "Quit"|..L. |
|00002710| 20 20 c8 99 20 57 69 6d | 70 5f 43 6c 6f 73 65 44 | .. Wim|p_CloseD|
|00002720| 6f 77 6e 25 3a e0 0d 0e | 56 09 20 20 20 20 7f 0d |own%:...|V. ..|
|00002730| 0e 60 35 20 20 20 20 20 | 20 85 20 31 2c 22 4d 65 |.`5 | . 1,"Me|
|00002740| 6e 75 20 64 65 63 6f 64 | 65 20 22 2b 73 65 6c 65 |nu decod|e "+sele|
|00002750| 63 74 69 6f 6e 24 2b 22 | 20 6e 6f 74 20 6b 6e 6f |ction$+"| not kno|
|00002760| 77 6e 2e 22 0d 0e 6a 07 | 20 20 cb 0d 0e 74 18 20 |wn."..j.| ...t. |
|00002770| 20 f4 20 72 65 64 72 61 | 77 20 69 66 20 61 64 6a | . redra|w if adj|
|00002780| 75 73 74 0d 0e 7e 21 20 | 20 c8 99 20 57 69 6d 70 |ust..~! | .. Wimp|
|00002790| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 25 |_GetPoin|terInfo%|
|000027a0| 2c 2c 71 25 0d 0e 88 12 | 20 20 e7 20 71 25 21 38 |,,q%....| . q%!8|
|000027b0| 20 3d 20 31 20 8c 0d 0e | 92 26 20 20 20 20 c8 99 | = 1 ...|.& ..|
|000027c0| 20 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 | Wimp_Cr|eateMenu|
|000027d0| 25 2c 2c 6d 61 69 6e 6d | 65 6e 75 25 0d 0e 9c 07 |%,,mainm|enu%....|
|000027e0| 20 20 cd 0d 0e a6 05 e1 | 0d 0e b0 04 0d 0e ba 11 | ......|........|
|000027f0| dd f2 64 65 66 69 6e 65 | 6d 65 6e 75 73 0d 0e c4 |..define|menus...|
|00002800| 1d 20 20 f4 20 73 65 74 | 75 70 20 6d 65 6e 75 20 |. . set|up menu |
|00002810| 73 74 72 75 63 74 75 72 | 65 73 0d 0e ce 1e 20 20 |structur|es.... |
|00002820| f4 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 20 6d 6f |. applic|ation mo|
|00002830| 64 69 66 69 61 62 6c 65 | 0d 0e d8 3c 20 20 74 69 |difiable|...< ti|
|00002840| 63 6b 25 3d 25 31 3a 64 | 6f 74 25 3d 25 31 30 3a |ck%=%1:d|ot%=%10:|
|00002850| 77 72 69 74 65 25 3d 25 | 31 30 30 3a 6c 61 73 74 |write%=%|100:last|
|00002860| 25 3d 25 31 30 30 30 30 | 30 30 30 3a 70 6c 61 69 |%=%10000|000:plai|
|00002870| 6e 25 3d 30 0d 0e e2 1f | 20 20 6e 6f 72 6d 61 6c |n%=0....| normal|
|00002880| 25 3d 20 28 37 3c 3c 32 | 34 29 20 84 20 25 31 30 |%= (7<<2|4) . %10|
|00002890| 30 30 31 0d 0e ec 20 20 | 20 73 68 61 64 65 64 25 |001... | shaded%|
|000028a0| 3d 20 28 34 3c 3c 32 30 | 29 20 84 20 6e 6f 72 6d |= (4<<20|) . norm|
|000028b0| 61 6c 25 0d 0e f6 18 20 | 20 6d 61 69 6e 6d 65 6e |al%.... | mainmen|
|000028c0| 75 69 74 65 6d 73 25 20 | 3d 20 38 0d 0f 00 17 20 |uitems% |= 8.... |
|000028d0| 20 73 75 62 6d 65 6e 75 | 69 74 65 6d 73 25 20 3d | submenu|items% =|
|000028e0| 20 38 0d 0f 0a 13 20 20 | 70 72 69 6e 74 65 72 73 | 8.... |printers|
|000028f0| 25 20 3d 20 32 0d 0f 14 | 36 20 20 ea 20 6d 25 20 |% = 2...|6 . m% |
|00002900| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002910| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002920| 20 3a f4 20 70 6f 69 6e | 74 65 72 0d 0f 1e 26 20 | :. poin|ter...& |
|00002930| 20 de 20 6d 61 69 6e 6d | 65 6e 75 25 20 32 38 2b | . mainm|enu% 28+|
|00002940| 6d 61 69 6e 6d 65 6e 75 | 69 74 65 6d 73 25 2a 32 |mainmenu|items%*2|
|00002950| 34 0d 0f 28 28 20 20 de | 20 4f 70 74 69 6f 6e 73 |4..(( .| Options|
|00002960| 6d 65 6e 75 25 20 32 38 | 2b 73 75 62 6d 65 6e 75 |menu% 28|+submenu|
|00002970| 69 74 65 6d 73 25 2a 32 | 34 0d 0f 32 24 20 20 de |items%*2|4..2$ .|
|00002980| 20 50 72 69 6e 74 65 72 | 6d 65 6e 75 25 20 32 38 | Printer|menu% 28|
|00002990| 2b 70 72 69 6e 74 65 72 | 73 25 2a 32 34 0d 0f 3c |+printer|s%*24..<|
|000029a0| 2c 20 20 6d 25 20 3d 20 | a4 6d 65 6e 75 28 6d 61 |, m% = |.menu(ma|
|000029b0| 69 6e 6d 65 6e 75 25 2c | 70 72 6f 67 72 61 6d 5f |inmenu%,|program_|
|000029c0| 6e 61 6d 65 24 2c 31 32 | 29 0d 0f 46 3e 20 20 6d |name$,12|)..F> m|
|000029d0| 25 20 3d 20 a4 6d 65 6e | 75 69 74 65 6d 28 6d 25 |% = .men|uitem(m%|
|000029e0| 2c 22 49 6e 66 6f 22 2c | 20 20 20 20 20 70 6c 61 |,"Info",| pla|
|000029f0| 69 6e 25 2c 20 20 20 20 | 69 6e 66 6f 25 2c 20 6e |in%, |info%, n|
|00002a00| 6f 72 6d 61 6c 25 29 0d | 0f 50 3e 20 20 6d 25 20 |ormal%).|.P> m% |
|00002a10| 3d 20 a4 6d 65 6e 75 69 | 74 65 6d 28 6d 25 2c 22 |= .menui|tem(m%,"|
|00002a20| 48 65 6c 70 22 2c 20 20 | 20 20 20 70 6c 61 69 6e |Help", | plain|
|00002a30| 25 2c 20 20 20 20 20 20 | 20 2d 31 2c 20 6e 6f 72 |%, | -1, nor|
|00002a40| 6d 61 6c 25 29 0d 0f 5a | 3e 20 20 6d 25 20 3d 20 |mal%)..Z|> m% = |
|00002a50| a4 6d 65 6e 75 69 74 65 | 6d 28 6d 25 2c 22 53 61 |.menuite|m(m%,"Sa|
|00002a60| 76 65 20 43 6f 6e 66 69 | 67 2e 22 2c 70 6c 61 69 |ve Confi|g.",plai|
|00002a70| 6e 25 2c 20 20 20 20 2d | 31 2c 20 6e 6f 72 6d 61 |n%, -|1, norma|
|00002a80| 6c 25 29 0d 0f 64 41 20 | 20 6d 25 20 3d 20 a4 6d |l%)..dA | m% = .m|
|00002a90| 65 6e 75 69 74 65 6d 28 | 6d 25 2c 22 50 72 69 6e |enuitem(|m%,"Prin|
|00002aa0| 74 65 72 22 2c 20 20 70 | 6c 61 69 6e 25 2c 50 72 |ter", p|lain%,Pr|
|00002ab0| 69 6e 74 65 72 6d 65 6e | 75 25 2c 20 6e 6f 72 6d |intermen|u%, norm|
|00002ac0| 61 6c 25 29 0d 0f 6e 41 | 20 20 6d 25 20 3d 20 a4 |al%)..nA| m% = .|
|00002ad0| 6d 65 6e 75 69 74 65 6d | 28 6d 25 2c 22 4f 70 74 |menuitem|(m%,"Opt|
|00002ae0| 69 6f 6e 73 22 2c 20 20 | 70 6c 61 69 6e 25 2c 4f |ions", |plain%,O|
|00002af0| 70 74 69 6f 6e 73 6d 65 | 6e 75 25 2c 20 6e 6f 72 |ptionsme|nu%, nor|
|00002b00| 6d 61 6c 25 29 0d 0f 78 | 3e 20 20 6d 25 20 3d 20 |mal%)..x|> m% = |
|00002b10| a4 6d 65 6e 75 69 74 65 | 6d 28 6d 25 2c 22 50 72 |.menuite|m(m%,"Pr|
|00002b20| 69 6e 74 22 2c 20 20 20 | 20 70 6c 61 69 6e 25 2c |int", | plain%,|
|00002b30| 20 20 20 20 20 20 20 2d | 31 2c 20 6e 6f 72 6d 61 | -|1, norma|
|00002b40| 6c 25 29 0d 0f 82 3e 20 | 20 6d 25 20 3d 20 a4 6d |l%)...> | m% = .m|
|00002b50| 65 6e 75 69 74 65 6d 28 | 6d 25 2c 22 43 6c 65 61 |enuitem(|m%,"Clea|
|00002b60| 72 22 2c 20 20 20 20 70 | 6c 61 69 6e 25 2c 20 20 |r", p|lain%, |
|00002b70| 20 20 20 20 20 2d 31 2c | 20 6e 6f 72 6d 61 6c 25 | -1,| normal%|
|00002b80| 29 0d 0f 8c 3e 20 20 6d | 25 20 3d 20 a4 6d 65 6e |)...> m|% = .men|
|00002b90| 75 69 74 65 6d 28 6d 25 | 2c 22 51 75 69 74 22 2c |uitem(m%|,"Quit",|
|00002ba0| 20 20 20 20 20 20 6c 61 | 73 74 25 2c 20 20 20 20 | la|st%, |
|00002bb0| 20 20 20 2d 31 2c 20 6e | 6f 72 6d 61 6c 25 29 0d | -1, n|ormal%).|
|00002bc0| 0f 96 2b 20 20 6d 25 20 | 3d 20 a4 6d 65 6e 75 28 |..+ m% |= .menu(|
|00002bd0| 50 72 69 6e 74 65 72 6d | 65 6e 75 25 2c 22 50 72 |Printerm|enu%,"Pr|
|00002be0| 69 6e 74 65 72 73 22 2c | 39 29 0d 0f a0 36 20 20 |inters",|9)...6 |
|00002bf0| 6d 25 20 3d 20 a4 6d 65 | 6e 75 69 74 65 6d 28 6d |m% = .me|nuitem(m|
|00002c00| 25 2c 22 45 70 73 6f 6e | 2d 46 58 22 2c 20 70 6c |%,"Epson|-FX", pl|
|00002c10| 61 69 6e 25 2c 2d 31 2c | 6e 6f 72 6d 61 6c 25 29 |ain%,-1,|normal%)|
|00002c20| 0d 0f aa 36 20 20 6d 25 | 20 3d 20 a4 6d 65 6e 75 |...6 m%| = .menu|
|00002c30| 69 74 65 6d 28 6d 25 2c | 22 53 74 61 72 2d 4c 43 |item(m%,|"Star-LC|
|00002c40| 31 30 22 2c 20 6c 61 73 | 74 25 2c 2d 31 2c 6e 6f |10", las|t%,-1,no|
|00002c50| 72 6d 61 6c 25 29 0d 0f | b4 13 20 20 c8 8e 20 70 |rmal%)..|.. .. p|
|00002c60| 72 69 6e 74 65 72 24 20 | ca 0d 0f be 2a 20 20 20 |rinter$ |....* |
|00002c70| 20 c9 20 22 45 70 73 6f | 6e 2d 46 58 22 3a f2 74 | . "Epso|n-FX":.t|
|00002c80| 69 63 6b 28 50 72 69 6e | 74 65 72 6d 65 6e 75 25 |ick(Prin|termenu%|
|00002c90| 2c 30 29 0d 0f c8 2b 20 | 20 20 20 c9 20 22 53 74 |,0)...+ | . "St|
|00002ca0| 61 72 2d 4c 43 31 30 22 | 3a f2 74 69 63 6b 28 50 |ar-LC10"|:.tick(P|
|00002cb0| 72 69 6e 74 65 72 6d 65 | 6e 75 25 2c 31 29 0d 0f |rinterme|nu%,1)..|
|00002cc0| d2 09 20 20 20 20 7f 0d | 0f dc 30 20 20 20 20 20 |.. ..|..0 |
|00002cd0| 20 85 20 31 30 30 2c 22 | 50 72 69 6e 74 65 72 3a | . 100,"|Printer:|
|00002ce0| 20 22 2b 70 72 69 6e 74 | 65 72 24 2b 22 20 75 6e | "+print|er$+" un|
|00002cf0| 6b 6e 6f 77 6e 2e 22 0d | 0f e6 07 20 20 cb 0d 0f |known.".|... ...|
|00002d00| f0 12 20 20 f2 6f 70 74 | 69 6f 6e 73 6d 65 6e 75 |.. .opt|ionsmenu|
|00002d10| 0d 0f fa 05 e1 0d 10 04 | 04 0d 10 0e 0f dd f2 74 |........|.......t|
|00002d20| 65 6d 70 6c 61 74 65 73 | 0d 10 18 11 20 20 f4 20 |emplates|.... . |
|00002d30| 67 6c 6f 62 61 6c 20 71 | 25 0d 10 22 14 20 20 69 |global q|%..". i|
|00002d40| 6e 64 69 72 6c 65 6e 25 | 3d 31 30 30 30 0d 10 2c |ndirlen%|=1000..,|
|00002d50| 21 20 20 de 20 71 25 20 | 33 35 30 30 2c 20 69 6e |! . q% |3500, in|
|00002d60| 64 69 72 25 20 69 6e 64 | 69 72 6c 65 6e 25 0d 10 |dir% ind|irlen%..|
|00002d70| 36 20 20 20 69 6e 64 69 | 72 65 6e 64 25 3d 69 6e |6 indi|rend%=in|
|00002d80| 64 69 72 25 2b 69 6e 64 | 69 72 6c 65 6e 25 0d 10 |dir%+ind|irlen%..|
|00002d90| 40 35 20 20 c8 99 20 57 | 69 6d 70 5f 4f 70 65 6e |@5 .. W|imp_Open|
|00002da0| 54 65 6d 70 6c 61 74 65 | 25 2c 2c 70 72 6f 67 5f |Template|%,,prog_|
|00002db0| 64 69 72 24 20 2b 20 22 | 2e 54 65 6d 70 6c 61 74 |dir$ + "|.Templat|
|00002dc0| 65 73 22 0d 10 4a 3b 20 | 20 ee 20 85 20 c8 99 20 |es"..J; | . . .. |
|00002dd0| 57 69 6d 70 5f 43 6c 6f | 73 65 54 65 6d 70 6c 61 |Wimp_Clo|seTempla|
|00002de0| 74 65 25 3a f2 65 72 72 | 6f 72 62 6f 78 28 70 72 |te%:.err|orbox(pr|
|00002df0| 6f 67 72 61 6d 5f 6e 61 | 6d 65 24 29 3a e1 0d 10 |ogram_na|me$):...|
|00002e00| 54 12 20 20 74 65 6d 70 | 25 3d 69 6e 64 69 72 25 |T. temp|%=indir%|
|00002e10| 0d 10 5e 45 20 20 c8 99 | 20 57 69 6d 70 5f 4c 6f |..^E ..| Wimp_Lo|
|00002e20| 61 64 54 65 6d 70 6c 61 | 74 65 25 2c 2c 71 25 2c |adTempla|te%,,q%,|
|00002e30| 74 65 6d 70 25 2c 69 6e | 64 69 72 65 6e 64 25 2c |temp%,in|dirend%,|
|00002e40| 2d 31 2c 22 69 6e 66 6f | 22 2c 30 20 b8 20 2c 2c |-1,"info|",0 . ,,|
|00002e50| 74 65 6d 70 25 0d 10 68 | 47 20 20 71 25 21 36 34 |temp%..h|G q%!64|
|00002e60| 3d 31 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |=1 | |
|00002e70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002e80| 20 20 20 20 20 3a f4 20 | 75 73 65 20 77 69 6d 70 | :. |use wimp|
|00002e90| 20 73 70 72 69 74 65 20 | 61 72 65 61 0d 10 72 27 | sprite |area..r'|
|00002ea0| 20 20 c8 99 20 57 69 6d | 70 5f 43 72 65 61 74 65 | .. Wim|p_Create|
|00002eb0| 57 69 6e 64 6f 77 25 2c | 2c 71 25 20 b8 20 69 6e |Window%,|,q% . in|
|00002ec0| 66 6f 25 0d 10 7c 4a 20 | 20 c8 99 20 57 69 6d 70 |fo%..|J | .. Wimp|
|00002ed0| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 25 2c 2c |_LoadTem|plate%,,|
|00002ee0| 71 25 2c 74 65 6d 70 25 | 2c 69 6e 64 69 72 65 6e |q%,temp%|,indiren|
|00002ef0| 64 25 2c 2d 31 2c 22 44 | 69 73 63 4c 61 62 65 6c |d%,-1,"D|iscLabel|
|00002f00| 22 2c 30 20 b8 20 2c 2c | 74 65 6d 70 25 0d 10 86 |",0 . ,,|temp%...|
|00002f10| 47 20 20 71 25 21 36 34 | 3d 31 20 20 20 20 20 20 |G q%!64|=1 |
|00002f20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002f30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 | | :. |
|00002f40| 75 73 65 20 77 69 6d 70 | 20 73 70 72 69 74 65 20 |use wimp| sprite |
|00002f50| 61 72 65 61 0d 10 90 2d | 20 20 c8 99 20 57 69 6d |area...-| .. Wim|
|00002f60| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 25 2c |p_Create|Window%,|
|00002f70| 2c 71 25 20 b8 20 64 69 | 73 63 77 69 6e 64 6f 77 |,q% . di|scwindow|
|00002f80| 25 0d 10 9a 1c 20 20 c8 | 99 20 57 69 6d 70 5f 43 |%.... .|. Wimp_C|
|00002f90| 6c 6f 73 65 54 65 6d 70 | 6c 61 74 65 25 0d 10 a4 |loseTemp|late%...|
|00002fa0| 05 e1 0d 10 ae 04 0d 10 | b8 04 0d 10 c2 04 0d 10 |........|........|
|00002fb0| cc 15 dd f2 6b 65 79 5f | 70 72 65 73 73 65 64 28 |....key_|pressed(|
|00002fc0| 71 25 29 0d 10 d6 1e 20 | 20 f4 20 64 65 61 6c 73 |q%).... | . deals|
|00002fd0| 20 77 69 74 68 20 6b 65 | 79 20 70 72 65 73 73 65 | with ke|y presse|
|00002fe0| 73 0d 10 e0 1d 20 20 f4 | 20 61 70 70 6c 69 63 61 |s.... .| applica|
|00002ff0| 74 69 6f 6e 20 64 65 70 | 65 6e 64 61 6e 74 0d 10 |tion dep|endant..|
|00003000| ea 20 20 20 ea 20 77 69 | 6e 64 6f 77 25 2c 69 63 |. . wi|ndow%,ic|
|00003010| 6f 6e 25 2c 6b 65 79 5f | 63 6f 64 65 25 2c 0d 10 |on%,key_|code%,..|
|00003020| f4 2d 20 20 ea 20 64 6f | 77 6e 5f 61 72 72 6f 77 |.- . do|wn_arrow|
|00003030| 25 2c 75 70 5f 61 72 72 | 6f 77 25 2c 74 61 62 25 |%,up_arr|ow%,tab%|
|00003040| 2c 73 68 69 66 74 5f 74 | 61 62 25 0d 10 fe 14 20 |,shift_t|ab%.... |
|00003050| 20 77 69 6e 64 6f 77 25 | 20 3d 20 71 25 21 30 0d | window%| = q%!0.|
|00003060| 11 08 12 20 20 69 63 6f | 6e 25 20 3d 20 71 25 21 |... ico|n% = q%!|
|00003070| 34 0d 11 12 17 20 20 6b | 65 79 5f 63 6f 64 65 25 |4.... k|ey_code%|
|00003080| 20 3d 20 71 25 21 32 34 | 0d 11 1c 17 20 20 70 72 | = q%!24|.... pr|
|00003090| 69 6e 74 5f 6b 65 79 25 | 20 3d 20 26 31 38 30 0d |int_key%| = &180.|
|000030a0| 11 26 18 20 20 64 6f 77 | 6e 5f 61 72 72 6f 77 25 |.&. dow|n_arrow%|
|000030b0| 20 3d 20 26 31 38 45 0d | 11 30 16 20 20 75 70 5f | = &18E.|.0. up_|
|000030c0| 61 72 72 6f 77 25 20 3d | 20 26 31 38 46 0d 11 3a |arrow% =| &18F..:|
|000030d0| 25 20 20 74 61 62 25 20 | 3d 20 26 31 38 41 20 3a |% tab% |= &18A :|
|000030e0| 20 73 68 69 66 74 5f 74 | 61 62 25 20 3d 20 26 31 | shift_t|ab% = &1|
|000030f0| 39 41 0d 11 44 12 20 20 | c8 8e 20 77 69 6e 64 6f |9A..D. |.. windo|
|00003100| 77 25 20 ca 0d 11 4e 15 | 20 20 20 20 c9 20 64 69 |w% ...N.| . di|
|00003110| 73 63 77 69 6e 64 6f 77 | 25 0d 11 58 18 20 20 20 |scwindow|%..X. |
|00003120| 20 20 20 c8 8e 20 6b 65 | 79 5f 63 6f 64 65 25 20 | .. ke|y_code% |
|00003130| ca 0d 11 62 1f 20 20 20 | 20 20 20 c9 20 31 33 2c |...b. | . 13,|
|00003140| 64 6f 77 6e 5f 61 72 72 | 6f 77 25 2c 74 61 62 25 |down_arr|ow%,tab%|
|00003150| 0d 11 6c 16 20 20 20 20 | 20 20 20 20 69 63 6f 6e |..l. | icon|
|00003160| 25 20 2b 3d 20 31 0d 11 | 76 20 20 20 20 20 20 20 |% += 1..|v |
|00003170| 20 20 e7 20 69 63 6f 6e | 25 3e 31 37 20 8c 20 69 | . icon|%>17 . i|
|00003180| 63 6f 6e 25 3d 34 0d 11 | 80 3a 20 20 20 20 20 20 |con%=4..|.: |
|00003190| 20 20 c8 99 20 57 69 6d | 70 5f 53 65 74 43 61 72 | .. Wim|p_SetCar|
|000031a0| 65 74 50 6f 73 69 74 69 | 6f 6e 25 2c 77 69 6e 64 |etPositi|on%,wind|
|000031b0| 6f 77 25 2c 69 63 6f 6e | 25 2c 2c 2c 2d 31 2c 30 |ow%,icon|%,,,-1,0|
|000031c0| 0d 11 8a 20 20 20 20 20 | 20 20 c9 20 75 70 5f 61 |... | . up_a|
|000031d0| 72 72 6f 77 25 2c 73 68 | 69 66 74 5f 74 61 62 25 |rrow%,sh|ift_tab%|
|000031e0| 0d 11 94 16 20 20 20 20 | 20 20 20 20 69 63 6f 6e |.... | icon|
|000031f0| 25 20 2d 3d 20 31 0d 11 | 9e 20 20 20 20 20 20 20 |% -= 1..|. |
|00003200| 20 20 e7 20 69 63 6f 6e | 25 3c 34 20 8c 20 69 63 | . icon|%<4 . ic|
|00003210| 6f 6e 25 3d 31 37 0d 11 | a8 3a 20 20 20 20 20 20 |on%=17..|.: |
|00003220| 20 20 c8 99 20 57 69 6d | 70 5f 53 65 74 43 61 72 | .. Wim|p_SetCar|
|00003230| 65 74 50 6f 73 69 74 69 | 6f 6e 25 2c 77 69 6e 64 |etPositi|on%,wind|
|00003240| 6f 77 25 2c 69 63 6f 6e | 25 2c 2c 2c 2d 31 2c 30 |ow%,icon|%,,,-1,0|
|00003250| 0d 11 b2 16 20 20 20 20 | 20 20 c9 20 70 72 69 6e |.... | . prin|
|00003260| 74 5f 6b 65 79 25 0d 11 | bc 18 20 20 20 20 20 20 |t_key%..|.. |
|00003270| 20 20 f2 70 72 69 6e 74 | 5f 6c 61 62 65 6c 0d 11 | .print|_label..|
|00003280| c6 0b 20 20 20 20 20 20 | 7f 0d 11 d0 29 20 20 20 |.. |....) |
|00003290| 20 20 20 20 20 c8 99 20 | 57 69 6d 70 5f 50 72 6f | .. |Wimp_Pro|
|000032a0| 63 65 73 73 4b 65 79 25 | 2c 6b 65 79 5f 63 6f 64 |cessKey%|,key_cod|
|000032b0| 65 25 0d 11 da 0b 20 20 | 20 20 20 20 cb 0d 11 e4 |e%.... | ....|
|000032c0| 09 20 20 20 20 7f 0d 11 | ee 27 20 20 20 20 20 20 |. ...|.' |
|000032d0| c8 99 20 57 69 6d 70 5f | 50 72 6f 63 65 73 73 4b |.. Wimp_|ProcessK|
|000032e0| 65 79 25 2c 6b 65 79 5f | 63 6f 64 65 25 0d 11 f8 |ey%,key_|code%...|
|000032f0| 07 20 20 cb 0d 12 02 05 | e1 0d 12 0c 04 0d 12 16 |. .....|........|
|00003300| 04 0d 12 20 3a f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |... :.--|--------|
|00003310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 42 41 53 49 43 20 |--------|--BASIC |
|00003330| 4c 69 62 20 66 6f 6c 6c | 6f 77 73 0d 12 2a 04 0d |Lib foll|ows..*..|
|00003340| 12 34 10 dd a4 70 72 69 | 6e 74 65 72 5f 6f 6e 0d |.4...pri|nter_on.|
|00003350| 12 3e 11 20 20 d6 70 72 | 69 6e 74 65 72 5f 6f 6e |.>. .pr|inter_on|
|00003360| 0d 12 48 13 20 20 c8 8e | 20 3f 72 65 73 75 6c 74 |..H. ..| ?result|
|00003370| 25 20 ca 0d 12 52 21 20 | 20 20 20 c9 20 30 20 3a |% ...R! | . 0 :|
|00003380| 20 f4 20 22 6e 6f 74 20 | 72 65 73 70 6f 6e 64 69 | . "not |respondi|
|00003390| 6e 67 2e 22 0d 12 5c 15 | 20 20 20 20 20 20 72 65 |ng."..\.| re|
|000033a0| 73 70 6f 6e 73 65 25 3d | a3 0d 12 66 21 20 20 20 |sponse%=|...f! |
|000033b0| 20 c9 20 31 20 3a 20 f4 | 20 22 72 65 61 64 79 2e | . 1 : .| "ready.|
|000033c0| 20 20 20 20 20 20 20 20 | 20 22 0d 12 70 15 20 20 | | "..p. |
|000033d0| 20 20 20 20 72 65 73 70 | 6f 6e 73 65 25 3d b9 0d | resp|onse%=..|
|000033e0| 12 7a 07 20 20 cb 0d 12 | 84 0e 3d 72 65 73 70 6f |.z. ...|..=respo|
|000033f0| 6e 73 65 25 0d 12 8e 04 | 0d 12 98 15 dd a4 64 69 |nse%....|......di|
|00003400| 73 63 6e 61 6d 65 28 70 | 61 74 68 24 29 0d 12 a2 |scname(p|ath$)...|
|00003410| 24 20 20 f4 20 65 78 74 | 72 61 63 74 73 20 64 69 |$ . ext|racts di|
|00003420| 73 63 20 6e 61 6d 65 20 | 66 72 6f 6d 20 70 61 74 |sc name |from pat|
|00003430| 68 0d 12 ac 1f 20 20 f4 | 20 61 70 70 6c 69 63 61 |h.... .| applica|
|00003440| 74 69 6f 6e 20 69 6e 64 | 65 70 65 6e 64 61 6e 74 |tion ind|ependant|
|00003450| 0d 12 b6 12 20 20 ea 20 | 66 72 6f 6d 25 2c 20 74 |.... . |from%, t|
|00003460| 6f 25 0d 12 c0 1e 20 20 | 66 72 6f 6d 25 20 3d 20 |o%.... |from% = |
|00003470| a7 70 61 74 68 24 2c 22 | 3a 3a 22 29 20 2b 20 32 |.path$,"|::") + 2|
|00003480| 0d 12 ca 19 20 20 74 6f | 25 20 20 20 3d 20 a7 70 |.... to|% = .p|
|00003490| 61 74 68 24 2c 22 2e 22 | 29 0d 12 d4 1c 3d c1 70 |ath$,"."|)....=.p|
|000034a0| 61 74 68 24 2c 66 72 6f | 6d 25 2c 74 6f 25 2d 66 |ath$,fro|m%,to%-f|
|000034b0| 72 6f 6d 25 29 0d 12 de | 04 0d 12 e8 11 dd a4 66 |rom%)...|.......f|
|000034c0| 69 6c 65 28 70 61 74 68 | 24 29 0d 12 f2 24 20 20 |ile(path|$)...$ |
|000034d0| f4 20 65 78 74 72 61 63 | 74 73 20 66 69 6c 65 20 |. extrac|ts file |
|000034e0| 6e 61 6d 65 20 66 72 6f | 6d 20 70 61 74 68 0d 12 |name fro|m path..|
|000034f0| fc 1f 20 20 f4 20 61 70 | 70 6c 69 63 61 74 69 6f |.. . ap|plicatio|
|00003500| 6e 20 69 6e 64 65 70 65 | 6e 64 61 6e 74 0d 13 06 |n indepe|ndant...|
|00003510| 11 20 20 ea 20 70 6f 73 | 69 74 69 6f 6e 25 0d 13 |. . pos|ition%..|
|00003520| 10 1d 20 20 70 6f 73 69 | 74 69 6f 6e 25 20 3d 20 |.. posi|tion% = |
|00003530| a7 70 61 74 68 24 2c 22 | 2e 22 29 0d 13 1a 17 20 |.path$,"|.").... |
|00003540| 20 c8 95 20 70 6f 73 69 | 74 69 6f 6e 25 20 3c 3e | .. posi|tion% <>|
|00003550| 20 30 0d 13 24 2c 20 20 | 20 20 70 61 74 68 24 20 | 0..$, | path$ |
|00003560| 3d 20 c2 70 61 74 68 24 | 2c a9 28 70 61 74 68 24 |= .path$|,.(path$|
|00003570| 29 20 2d 20 70 6f 73 69 | 74 69 6f 6e 25 29 0d 13 |) - posi|tion%)..|
|00003580| 2e 1f 20 20 20 20 70 6f | 73 69 74 69 6f 6e 25 20 |.. po|sition% |
|00003590| 3d 20 a7 70 61 74 68 24 | 2c 22 2e 22 29 0d 13 38 |= .path$|,".")..8|
|000035a0| 07 20 20 ce 0d 13 42 0a | 3d 70 61 74 68 24 0d 13 |. ...B.|=path$..|
|000035b0| 4c 04 0d 13 56 10 dd a4 | 70 61 64 28 74 65 78 74 |L...V...|pad(text|
|000035c0| 24 29 0d 13 60 44 20 20 | f4 20 70 61 64 73 20 74 |$)..`D |. pads t|
|000035d0| 65 78 74 20 77 69 74 68 | 20 73 70 61 63 65 28 73 |ext with| space(s|
|000035e0| 29 20 74 6f 20 62 65 20 | 6e 65 78 74 20 6d 75 6c |) to be |next mul|
|000035f0| 74 69 70 6c 65 20 6f 66 | 20 31 34 20 63 68 61 72 |tiple of| 14 char|
|00003600| 73 20 77 69 64 65 0d 13 | 6a 1f 20 20 f4 20 61 70 |s wide..|j. . ap|
|00003610| 70 6c 69 63 61 74 69 6f | 6e 20 69 6e 64 65 70 65 |plicatio|n indepe|
|00003620| 6e 64 61 6e 74 0d 13 74 | 0c 20 20 ea 20 6c 65 6e |ndant..t|. . len|
|00003630| 25 0d 13 7e 07 20 20 f5 | 0d 13 88 14 20 20 20 20 |%..~. .|.... |
|00003640| 74 65 78 74 24 20 2b 3d | 20 22 20 22 0d 13 92 15 |text$ +=| " "....|
|00003650| 20 20 20 20 6c 65 6e 25 | 3d a9 28 74 65 78 74 24 | len%|=.(text$|
|00003660| 29 0d 13 9c 15 20 20 fd | 20 6c 65 6e 25 20 83 20 |).... .| len% . |
|00003670| 31 34 20 3d 20 30 0d 13 | a6 0a 3d 74 65 78 74 24 |14 = 0..|..=text$|
|00003680| 0d 13 b0 04 0d 13 ba 10 | dd a4 73 74 72 69 6e 67 |........|..string|
|00003690| 28 61 25 29 0d 13 c4 2b | 20 20 f4 20 65 78 74 61 |(a%)...+| . exta|
|000036a0| 63 74 73 20 43 20 73 74 | 79 6c 65 20 30 20 74 65 |cts C st|yle 0 te|
|000036b0| 72 6d 69 6e 61 74 65 64 | 20 73 74 72 69 6e 67 0d |rminated| string.|
|000036c0| 13 ce 1f 20 20 f4 20 61 | 70 70 6c 69 63 61 74 69 |... . a|pplicati|
|000036d0| 6f 6e 20 69 6e 64 65 70 | 65 6e 64 61 6e 74 0d 13 |on indep|endant..|
|000036e0| d8 0a 20 20 ea 20 62 24 | 0d 13 e2 0b 20 20 62 24 |.. . b$|.... b$|
|000036f0| 3d 22 22 0d 13 ec 0f 20 | 20 c8 95 20 3f 61 25 3c |="".... | .. ?a%<|
|00003700| 3e 30 0d 13 f6 10 20 20 | 20 20 62 24 2b 3d bd 3f |>0.... | b$+=.?|
|00003710| 61 25 0d 14 00 0d 20 20 | 20 20 61 25 2b 3d 31 0d |a%.... | a%+=1.|
|00003720| 14 0a 07 20 20 ce 0d 14 | 14 07 3d 62 24 0d 14 1e |... ...|..=b$...|
|00003730| 04 0d 14 28 1e dd 20 a4 | 66 6f 72 63 65 5f 6c 6f |...(.. .|force_lo|
|00003740| 77 65 72 5f 63 61 73 65 | 28 74 65 78 74 24 29 0d |wer_case|(text$).|
|00003750| 14 32 1f 20 20 f4 20 61 | 70 70 6c 69 63 61 74 69 |.2. . a|pplicati|
|00003760| 6f 6e 20 69 6e 64 65 70 | 65 6e 64 61 6e 74 0d 14 |on indep|endant..|
|00003770| 3c 13 20 20 ea 20 6c 6f | 6f 70 25 2c 20 63 68 72 |<. . lo|op%, chr|
|00003780| 25 0d 14 46 1a 20 20 e3 | 20 6c 6f 6f 70 25 3d 31 |%..F. .| loop%=1|
|00003790| 20 b8 20 a9 28 74 65 78 | 74 24 29 0d 14 50 1f 20 | . .(tex|t$)..P. |
|000037a0| 20 20 20 63 68 72 25 3d | 97 28 c1 74 65 78 74 24 | chr%=|.(.text$|
|000037b0| 2c 6c 6f 6f 70 25 2c 31 | 29 29 0d 14 5a 1d 20 20 |,loop%,1|))..Z. |
|000037c0| 20 20 e7 20 63 68 72 25 | 3e 36 34 20 80 20 63 68 | . chr%|>64 . ch|
|000037d0| 72 25 3c 39 31 20 8c 0d | 14 64 24 20 20 20 20 20 |r%<91 ..|.d$ |
|000037e0| 20 c1 74 65 78 74 24 2c | 6c 6f 6f 70 25 2c 31 29 | .text$,|loop%,1)|
|000037f0| 3d bd 28 63 68 72 25 2b | 33 32 29 0d 14 6e 09 20 |=.(chr%+|32)..n. |
|00003800| 20 20 20 cd 0d 14 78 07 | 20 20 ed 0d 14 82 0a 3d | ...x.| .....=|
|00003810| 74 65 78 74 24 0d 14 8c | 04 0d 14 96 17 dd f2 70 |text$...|.......p|
|00003820| 72 69 6e 74 5f 6c 69 6e | 65 28 6c 69 6e 65 24 29 |rint_lin|e(line$)|
|00003830| 0d 14 a0 1d 20 20 f4 20 | 73 65 6e 64 73 20 6c 69 |.... . |sends li|
|00003840| 6e 65 20 74 6f 20 70 72 | 69 6e 74 65 72 0d 14 aa |ne to pr|inter...|
|00003850| 1f 20 20 f4 20 61 70 70 | 6c 69 63 61 74 69 6f 6e |. . app|lication|
|00003860| 20 69 6e 64 65 70 65 6e | 64 61 6e 74 0d 14 b4 30 | indepen|dant...0|
|00003870| 20 20 f4 20 73 69 64 65 | 20 65 66 66 65 63 74 73 | . side| effects|
|00003880| 20 74 75 72 6e 73 20 70 | 72 69 6e 74 65 72 20 6f | turns p|rinter o|
|00003890| 66 66 20 77 69 74 68 20 | 56 44 55 33 0d 14 be 0d |ff with |VDU3....|
|000038a0| 20 20 ea 20 6c 6f 6f 70 | 25 0d 14 c8 08 20 20 ef | . loop|%.... .|
|000038b0| 32 0d 14 d2 1a 20 20 e3 | 20 6c 6f 6f 70 25 3d 31 |2.... .| loop%=1|
|000038c0| 20 b8 20 a9 28 6c 69 6e | 65 24 29 0d 14 dc 1d 20 | . .(lin|e$).... |
|000038d0| 20 20 20 ef 31 2c 97 28 | c1 6c 69 6e 65 24 2c 6c | .1,.(|.line$,l|
|000038e0| 6f 6f 70 25 2c 31 29 29 | 0d 14 e6 07 20 20 ed 0d |oop%,1))|.... ..|
|000038f0| 14 f0 12 20 20 ef 31 2c | 31 30 2c 31 2c 31 33 2c |... .1,|10,1,13,|
|00003900| 33 0d 14 fa 05 e1 0d 15 | 04 04 0d 15 0e 1e dd 20 |3.......|....... |
|00003910| a4 73 65 6e 64 5f 70 72 | 69 6e 74 65 72 28 66 75 |.send_pr|inter(fu|
|00003920| 6e 63 74 69 6f 6e 24 29 | 0d 15 18 2c 20 20 f4 20 |nction$)|..., . |
|00003930| 73 65 6e 64 73 20 63 6f | 6e 74 72 6f 6c 20 73 65 |sends co|ntrol se|
|00003940| 71 75 65 6e 63 65 73 20 | 74 6f 20 61 20 70 72 69 |quences |to a pri|
|00003950| 6e 74 65 72 0d 15 22 3c | 20 20 f4 20 70 72 69 6e |nter.."<| . prin|
|00003960| 74 65 72 20 63 6f 6e 74 | 72 6f 6c 20 63 6f 64 65 |ter cont|rol code|
|00003970| 73 20 66 6f 72 20 53 74 | 61 72 2d 4c 43 31 30 20 |s for St|ar-LC10 |
|00003980| 69 6e 20 73 74 61 6e 64 | 61 72 64 20 6d 6f 64 65 |in stand|ard mode|
|00003990| 0d 15 2c 27 20 20 f4 20 | 64 65 70 65 6e 64 61 6e |..,' . |dependan|
|000039a0| 74 20 6f 6e 20 46 4e 66 | 6f 72 63 65 5f 6c 6f 77 |t on FNf|orce_low|
|000039b0| 65 72 5f 63 61 73 65 0d | 15 36 30 20 20 f4 20 73 |er_case.|.60 . s|
|000039c0| 69 64 65 20 65 66 66 65 | 63 74 73 20 74 75 72 6e |ide effe|cts turn|
|000039d0| 73 20 70 72 69 6e 74 65 | 72 20 6f 66 66 20 77 69 |s printe|r off wi|
|000039e0| 74 68 20 56 44 55 33 0d | 15 40 2e 20 20 66 75 6e |th VDU3.|.@. fun|
|000039f0| 63 74 69 6f 6e 24 20 3d | 20 a4 66 6f 72 63 65 5f |ction$ =| .force_|
|00003a00| 6c 6f 77 65 72 5f 63 61 | 73 65 28 66 75 6e 63 74 |lower_ca|se(funct|
|00003a10| 69 6f 6e 24 29 0d 15 4a | 37 f4 20 64 65 62 75 67 |ion$)..J|7. debug|
|00003a20| 24 20 3d 20 46 4e 70 72 | 6f 62 6c 65 6d 28 54 52 |$ = FNpr|oblem(TR|
|00003a30| 55 45 2c 46 41 4c 53 45 | 2c 22 44 65 62 75 67 3a |UE,FALSE|,"Debug:|
|00003a40| 22 2b 66 75 6e 63 74 69 | 6f 6e 24 29 0d 15 54 08 |"+functi|on$)..T.|
|00003a50| 20 20 ef 32 0d 15 5e 14 | 20 20 c8 8e 20 66 75 6e | .2..^.| .. fun|
|00003a60| 63 74 69 6f 6e 24 20 ca | 0d 15 68 25 20 20 20 20 |ction$ .|..h% |
|00003a70| c9 20 22 63 6f 6e 64 65 | 6e 73 65 64 22 20 20 20 |. "conde|nsed" |
|00003a80| 20 20 20 20 20 20 20 3a | ef 31 2c 31 35 0d 15 72 | :|.1,15..r|
|00003a90| 25 20 20 20 20 c9 20 22 | 63 6f 6e 64 65 6e 73 65 |% . "|condense|
|00003aa0| 64 5f 6f 66 66 22 20 20 | 20 20 20 20 3a ef 31 2c |d_off" | :.1,|
|00003ab0| 31 38 0d 15 7c 3e 20 20 | 20 20 c9 20 22 63 6f 75 |18..|> | . "cou|
|00003ac0| 72 69 65 72 22 20 20 20 | 20 20 20 20 20 20 20 20 |rier" | |
|00003ad0| 20 3a ef 31 2c 32 37 2c | 31 2c 31 30 37 2c 31 2c | :.1,27,|1,107,1,|
|00003ae0| 30 2c 31 2c 32 37 2c 31 | 2c 31 32 30 2c 31 2c 31 |0,1,27,1|,120,1,1|
|00003af0| 0d 15 86 30 20 20 20 20 | c9 20 22 64 6f 75 62 6c |...0 |. "doubl|
|00003b00| 65 20 68 69 67 68 22 20 | 20 20 20 20 20 20 20 3a |e high" | :|
|00003b10| ef 31 2c 32 37 2c 31 2c | 31 31 39 2c 31 2c 34 39 |.1,27,1,|119,1,49|
|00003b20| 0d 15 90 2f 20 20 20 20 | c9 20 22 64 6f 75 62 6c |.../ |. "doubl|
|00003b30| 65 5f 68 65 69 67 68 74 | 5f 6f 66 66 22 20 20 3a |e_height|_off" :|
|00003b40| ef 31 2c 32 37 2c 31 2c | 31 31 39 2c 31 2c 30 0d |.1,27,1,|119,1,0.|
|00003b50| 15 9a 2f 20 20 20 20 c9 | 20 22 64 6f 75 62 6c 65 |../ .| "double|
|00003b60| 20 73 69 7a 65 22 20 20 | 20 20 20 20 20 20 3a ef | size" | :.|
|00003b70| 31 2c 32 37 2c 31 2c 31 | 30 34 2c 31 2c 31 0d 15 |1,27,1,1|04,1,1..|
|00003b80| a4 2f 20 20 20 20 c9 20 | 22 64 6f 75 62 6c 65 5f |./ . |"double_|
|00003b90| 73 69 7a 65 5f 6f 66 66 | 22 20 20 20 20 3a ef 31 |size_off|" :.1|
|00003ba0| 2c 32 37 2c 31 2c 31 30 | 34 2c 31 2c 30 0d 15 ae |,27,1,10|4,1,0...|
|00003bb0| 2a 20 20 20 20 c9 20 22 | 64 6f 75 62 6c 65 20 73 |* . "|double s|
|00003bc0| 74 72 22 20 20 20 20 20 | 20 20 20 20 3a ef 31 2c |tr" | :.1,|
|00003bd0| 32 37 2c 31 2c 37 31 0d | 15 b8 2a 20 20 20 20 c9 |27,1,71.|..* .|
|00003be0| 20 22 64 6f 75 62 6c 65 | 5f 73 74 72 69 6b 65 5f | "double|_strike_|
|00003bf0| 6f 66 66 22 20 20 3a ef | 31 2c 32 37 2c 31 2c 37 |off" :.|1,27,1,7|
|00003c00| 32 0d 15 c2 2f 20 20 20 | 20 c9 20 22 64 72 61 66 |2.../ | . "draf|
|00003c10| 74 22 2c 22 6e 6c 71 5f | 6f 66 66 22 20 20 20 20 |t","nlq_|off" |
|00003c20| 3a ef 31 2c 32 37 2c 31 | 2c 31 32 30 2c 31 2c 30 |:.1,27,1|,120,1,0|
|00003c30| 0d 15 cc 2a 20 20 20 20 | c9 20 22 65 6c 69 74 65 |...* |. "elite|
|00003c40| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a |" | :|
|00003c50| ef 31 2c 32 37 2c 31 2c | 37 37 0d 15 d6 2a 20 20 |.1,27,1,|77...* |
|00003c60| 20 20 c9 20 22 65 6d 70 | 68 61 73 69 7a 65 64 22 | . "emp|hasized"|
|00003c70| 20 20 20 20 20 20 20 20 | 20 3a ef 31 2c 32 37 2c | | :.1,27,|
|00003c80| 31 2c 36 39 0d 15 e0 2a | 20 20 20 20 c9 20 22 65 |1,69...*| . "e|
|00003c90| 6d 70 68 61 73 69 7a 65 | 64 5f 6f 66 66 22 20 20 |mphasize|d_off" |
|00003ca0| 20 20 20 3a ef 31 2c 32 | 37 2c 31 2c 37 30 0d 15 | :.1,2|7,1,70..|
|00003cb0| ea 2f 20 20 20 20 c9 20 | 22 65 78 70 61 6e 64 65 |./ . |"expande|
|00003cc0| 64 22 20 20 20 20 20 20 | 20 20 20 20 20 3a ef 31 |d" | :.1|
|00003cd0| 2c 32 37 2c 31 2c 38 37 | 2c 31 2c 34 39 0d 15 f4 |,27,1,87|,1,49...|
|00003ce0| 2f 20 20 20 20 c9 20 22 | 65 78 70 61 6e 64 65 64 |/ . "|expanded|
|00003cf0| 5f 6f 66 66 22 20 20 20 | 20 20 20 20 3a ef 31 2c |_off" | :.1,|
|00003d00| 32 37 2c 31 2c 38 37 2c | 31 2c 34 38 0d 15 fe 2a |27,1,87,|1,48...*|
|00003d10| 20 20 20 20 c9 20 22 69 | 74 61 6c 69 63 22 20 20 | . "i|talic" |
|00003d20| 20 20 20 20 20 20 20 20 | 20 20 20 3a ef 31 2c 32 | | :.1,2|
|00003d30| 37 2c 31 2c 35 32 0d 16 | 08 2a 20 20 20 20 c9 20 |7,1,52..|.* . |
|00003d40| 22 69 74 61 6c 69 63 5f | 6f 66 66 22 20 20 20 20 |"italic_|off" |
|00003d50| 20 20 20 20 20 3a ef 31 | 2c 32 37 2c 31 2c 35 33 | :.1|,27,1,53|
|00003d60| 0d 16 12 30 20 20 20 20 | c9 20 22 6e 6c 71 22 20 |...0 |. "nlq" |
|00003d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a | | :|
|00003d80| ef 31 2c 32 37 2c 31 2c | 31 32 30 2c 31 2c 34 39 |.1,27,1,|120,1,49|
|00003d90| 0d 16 1c 3e 20 20 20 20 | c9 20 22 6f 72 61 74 6f |...> |. "orato|
|00003da0| 72 22 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a |r" | :|
|00003db0| ef 31 2c 32 37 2c 31 2c | 31 30 37 2c 31 2c 33 2c |.1,27,1,|107,1,3,|
|00003dc0| 31 2c 32 37 2c 31 2c 31 | 32 30 2c 31 2c 31 0d 16 |1,27,1,1|20,1,1..|
|00003dd0| 26 3e 20 20 20 20 c9 20 | 22 6f 72 61 74 6f 72 20 |&> . |"orator |
|00003de0| 73 63 22 20 20 20 20 20 | 20 20 20 20 20 3a ef 31 |sc" | :.1|
|00003df0| 2c 32 37 2c 31 2c 31 30 | 37 2c 31 2c 32 2c 31 2c |,27,1,10|7,1,2,1,|
|00003e00| 32 37 2c 31 2c 31 32 30 | 2c 31 2c 31 0d 16 30 2f |27,1,120|,1,1..0/|
|00003e10| 20 20 20 20 c9 20 22 6f | 76 65 72 6c 69 6e 69 6e | . "o|verlinin|
|00003e20| 67 22 20 20 20 20 20 20 | 20 20 20 3a ef 31 2c 32 |g" | :.1,2|
|00003e30| 37 2c 31 2c 39 35 2c 31 | 2c 34 39 0d 16 3a 2f 20 |7,1,95,1|,49..:/ |
|00003e40| 20 20 20 c9 20 22 6f 76 | 65 72 6c 69 6e 69 6e 67 | . "ov|erlining|
|00003e50| 5f 6f 66 66 22 20 20 20 | 20 20 3a ef 31 2c 32 37 |_off" | :.1,27|
|00003e60| 2c 31 2c 39 35 2c 31 2c | 34 38 0d 16 44 2a 20 20 |,1,95,1,|48..D* |
|00003e70| 20 20 c9 20 22 70 69 63 | 61 22 20 20 20 20 20 20 | . "pic|a" |
|00003e80| 20 20 20 20 20 20 20 20 | 20 3a ef 31 2c 32 37 2c | | :.1,27,|
|00003e90| 31 2c 38 30 0d 16 4e 31 | 20 20 20 20 c9 20 22 70 |1,80..N1| . "p|
|00003ea0| 72 6f 70 2e 73 70 61 63 | 65 64 22 20 20 20 20 20 |rop.spac|ed" |
|00003eb0| 20 20 20 20 3a ef 31 2c | 32 37 2c 31 2c 31 31 32 | :.1,|27,1,112|
|00003ec0| 2c 31 2c 34 39 0d 16 58 | 30 20 20 20 20 c9 20 22 |,1,49..X|0 . "|
|00003ed0| 70 72 6f 70 6f 72 74 69 | 6f 6e 61 6c 5f 6f 66 66 |proporti|onal_off|
|00003ee0| 22 20 20 20 3a ef 31 2c | 32 37 2c 31 2c 31 31 32 |" :.1,|27,1,112|
|00003ef0| 2c 31 2c 34 38 0d 16 62 | 2f 20 20 20 20 c9 20 22 |,1,48..b|/ . "|
|00003f00| 71 75 61 64 20 73 69 7a | 65 22 20 20 20 20 20 20 |quad siz|e" |
|00003f10| 20 20 20 20 3a ef 31 2c | 32 37 2c 31 2c 31 30 34 | :.1,|27,1,104|
|00003f20| 2c 31 2c 32 0d 16 6c 2f | 20 20 20 20 c9 20 22 6e |,1,2..l/| . "n|
|00003f30| 6f 72 6d 61 6c 20 73 69 | 7a 65 22 20 20 20 20 20 |ormal si|ze" |
|00003f40| 20 20 20 3a ef 31 2c 32 | 37 2c 31 2c 31 30 34 2c | :.1,2|7,1,104,|
|00003f50| 31 2c 30 0d 16 76 2a 20 | 20 20 20 c9 20 22 72 65 |1,0..v* | . "re|
|00003f60| 73 65 74 22 20 20 20 20 | 20 20 20 20 20 20 20 20 |set" | |
|00003f70| 20 20 3a ef 31 2c 32 37 | 2c 31 2c 36 34 0d 16 80 | :.1,27|,1,64...|
|00003f80| 30 20 20 20 20 c9 20 22 | 73 75 62 73 63 72 69 70 |0 . "|subscrip|
|00003f90| 74 22 20 20 20 20 20 20 | 20 20 20 20 3a ef 31 2c |t" | :.1,|
|00003fa0| 32 37 2c 31 2c 38 33 20 | 2c 31 2c 34 39 0d 16 8a |27,1,83 |,1,49...|
|00003fb0| 2a 20 20 20 20 c9 20 22 | 73 75 62 73 63 72 69 70 |* . "|subscrip|
|00003fc0| 74 5f 6f 66 66 22 20 20 | 20 20 20 20 3a ef 31 2c |t_off" | :.1,|
|00003fd0| 32 37 2c 31 2c 38 34 0d | 16 94 30 20 20 20 20 c9 |27,1,84.|..0 .|
|00003fe0| 20 22 73 75 70 65 72 73 | 63 72 69 70 74 22 20 20 | "supers|cript" |
|00003ff0| 20 20 20 20 20 20 3a ef | 31 2c 32 37 2c 31 2c 38 | :.|1,27,1,8|
|00004000| 33 20 2c 31 2c 34 38 0d | 16 9e 2a 20 20 20 20 c9 |3 ,1,48.|..* .|
|00004010| 20 22 73 75 70 65 72 73 | 63 72 69 70 74 5f 6f 66 | "supers|cript_of|
|00004020| 66 22 20 20 20 20 3a ef | 31 2c 32 37 2c 31 2c 38 |f" :.|1,27,1,8|
|00004030| 34 0d 16 a8 3e 20 20 20 | 20 c9 20 22 73 61 6e 73 |4...> | . "sans|
|00004040| 20 73 65 72 69 66 22 20 | 20 20 20 20 20 20 20 20 | serif" | |
|00004050| 3a ef 31 2c 32 37 2c 31 | 2c 31 30 37 2c 31 2c 31 |:.1,27,1|,107,1,1|
|00004060| 2c 31 2c 32 37 2c 31 2c | 31 32 30 2c 31 2c 31 0d |,1,27,1,|120,1,1.|
|00004070| 16 b2 2f 20 20 20 20 c9 | 20 22 75 6e 64 65 72 6c |../ .| "underl|
|00004080| 69 6e 69 6e 67 22 20 20 | 20 20 20 20 20 20 3a ef |ining" | :.|
|00004090| 31 2c 32 37 2c 31 2c 34 | 35 2c 31 2c 34 39 0d 16 |1,27,1,4|5,1,49..|
|000040a0| bc 2f 20 20 20 20 c9 20 | 22 75 6e 64 65 72 6c 69 |./ . |"underli|
|000040b0| 6e 69 6e 67 5f 6f 66 66 | 22 20 20 20 20 3a ef 31 |ning_off|" :.1|
|000040c0| 2c 32 37 2c 31 2c 34 35 | 2c 31 2c 34 38 0d 16 c6 |,27,1,45|,1,48...|
|000040d0| 2e 20 20 20 20 c9 20 22 | 73 6b 69 70 20 70 65 72 |. . "|skip per|
|000040e0| 66 2e 22 20 20 20 20 20 | 20 20 20 20 3a ef 31 2c |f." | :.1,|
|000040f0| 32 37 2c 31 2c 37 38 2c | 31 2c 34 0d 16 d0 39 20 |27,1,78,|1,4...9 |
|00004100| 20 20 20 7f 20 85 20 31 | 2c 22 53 65 6e 64 5f 70 | . . 1|,"Send_p|
|00004110| 72 69 6e 74 65 72 20 75 | 6e 6b 6e 6f 77 6e 20 63 |rinter u|nknown c|
|00004120| 6f 6d 6d 61 6e 64 20 2d | 20 22 2b 66 75 6e 63 74 |ommand -| "+funct|
|00004130| 69 6f 6e 24 0d 16 da 07 | 20 20 cb 0d 16 e4 08 20 |ion$....| ..... |
|00004140| 20 ef 33 0d 16 ee 06 3d | b9 0d 16 f8 04 0d 17 02 | .3....=|........|
|00004150| 14 dd a4 72 65 61 64 76 | 61 72 28 6e 61 6d 65 24 |...readv|ar(name$|
|00004160| 29 0d 17 0c 42 20 20 f4 | 20 72 65 74 75 72 6e 73 |)...B .| returns|
|00004170| 20 74 68 65 20 73 74 72 | 69 6e 67 20 63 6f 6e 74 | the str|ing cont|
|00004180| 61 69 6e 65 64 20 69 6e | 20 61 6e 20 4f 53 20 65 |ained in| an OS e|
|00004190| 6e 76 69 72 6f 6e 6d 65 | 6e 74 20 76 61 72 69 61 |nvironme|nt varia|
|000041a0| 62 6c 65 0d 17 16 1f 20 | 20 f4 20 61 70 70 6c 69 |ble.... | . appli|
|000041b0| 63 61 74 69 6f 6e 20 69 | 6e 64 65 70 65 6e 64 61 |cation i|ndependa|
|000041c0| 6e 74 0d 17 20 29 20 20 | ea 20 71 25 2c 20 62 79 |nt.. ) |. q%, by|
|000041d0| 74 65 73 25 2c 20 6e 61 | 6d 65 25 2c 20 6c 6f 6f |tes%, na|me%, loo|
|000041e0| 70 25 2c 20 72 65 73 75 | 6c 74 24 0d 17 2a 19 20 |p%, resu|lt$..*. |
|000041f0| 20 de 20 71 25 20 32 35 | 36 2c 20 6e 61 6d 65 25 | . q% 25|6, name%|
|00004200| 20 31 30 30 0d 17 34 14 | 20 20 24 6e 61 6d 65 25 | 100..4.| $name%|
|00004210| 20 3d 20 6e 61 6d 65 24 | 0d 17 3e 31 20 20 c8 99 | = name$|..>1 ..|
|00004220| 20 4f 53 5f 52 65 61 64 | 56 61 72 56 61 6c 25 2c | OS_Read|VarVal%,|
|00004230| 6e 61 6d 65 25 2c 71 25 | 2c 32 35 36 2c 30 20 b8 |name%,q%|,256,0 .|
|00004240| 20 2c 2c 62 79 74 65 73 | 25 0d 17 48 10 20 20 72 | ,,bytes|%..H. r|
|00004250| 65 73 75 6c 74 24 3d 22 | 22 0d 17 52 1c 20 20 e3 |esult$="|"..R. .|
|00004260| 20 6c 6f 6f 70 25 3d 30 | 20 b8 20 62 79 74 65 73 | loop%=0| . bytes|
|00004270| 25 20 2d 20 31 0d 17 5c | 1d 20 20 20 20 72 65 73 |% - 1..\|. res|
|00004280| 75 6c 74 24 20 2b 3d 20 | bd 20 71 25 3f 6c 6f 6f |ult$ += |. q%?loo|
|00004290| 70 25 0d 17 66 07 20 20 | ed 0d 17 70 0c 3d 72 65 |p%..f. |...p.=re|
|000042a0| 73 75 6c 74 24 0d 17 7a | 04 0d 17 84 3a f4 2d 2d |sult$..z|....:.--|
|000042b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000042c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000042d0| 2d 2d 2d 57 69 6d 70 20 | 4c 69 62 20 66 6f 6c 6c |---Wimp |Lib foll|
|000042e0| 6f 77 73 0d 17 8e 04 0d | 17 98 17 dd f2 72 65 64 |ows.....|.....red|
|000042f0| 72 61 77 5f 77 69 6e 64 | 6f 77 28 71 25 29 0d 17 |raw_wind|ow(q%)..|
|00004300| a2 0d 20 20 ea 20 6d 6f | 72 65 25 0d 17 ac 27 20 |.. . mo|re%...' |
|00004310| 20 c8 99 20 57 69 6d 70 | 5f 52 65 64 72 61 77 57 | .. Wimp|_RedrawW|
|00004320| 69 6e 64 6f 77 25 2c 2c | 71 25 20 b8 20 6d 6f 72 |indow%,,|q% . mor|
|00004330| 65 25 0d 17 b6 0e 20 20 | c8 95 20 6d 6f 72 65 25 |e%.... |.. more%|
|00004340| 0d 17 c0 14 20 20 20 20 | 85 20 30 2c 22 49 6e 6c |.... |. 0,"Inl|
|00004350| 6f 6f 70 22 0d 17 ca 29 | 20 20 20 20 c8 99 20 57 |oop"...)| .. W|
|00004360| 69 6d 70 5f 47 65 74 52 | 65 63 74 61 6e 67 6c 65 |imp_GetR|ectangle|
|00004370| 25 2c 2c 71 25 20 b8 20 | 6d 6f 72 65 25 0d 17 d4 |%,,q% . |more%...|
|00004380| 07 20 20 ce 0d 17 de 05 | e1 0d 17 e8 04 0d 17 f2 |. .....|........|
|00004390| 15 dd f2 6f 70 65 6e 5f | 77 69 6e 64 6f 77 28 71 |...open_|window(q|
|000043a0| 25 29 0d 17 fc 1d 20 20 | c8 99 20 57 69 6d 70 5f |%).... |.. Wimp_|
|000043b0| 4f 70 65 6e 57 69 6e 64 | 6f 77 25 2c 2c 71 25 0d |OpenWind|ow%,,q%.|
|000043c0| 18 06 05 e1 0d 18 10 04 | 0d 18 1a 16 dd f2 63 6c |........|......cl|
|000043d0| 6f 73 65 5f 77 69 6e 64 | 6f 77 28 71 25 29 0d 18 |ose_wind|ow(q%)..|
|000043e0| 24 1e 20 20 c8 99 20 57 | 69 6d 70 5f 43 6c 6f 73 |$. .. W|imp_Clos|
|000043f0| 65 57 69 6e 64 6f 77 25 | 2c 2c 71 25 0d 18 2e 05 |eWindow%|,,q%....|
|00004400| e1 0d 18 38 04 0d 18 42 | 04 0d 18 4c 04 0d 18 56 |...8...B|...L...V|
|00004410| 25 dd f2 75 70 64 61 74 | 65 69 63 6f 6e 28 77 69 |%..updat|eicon(wi|
|00004420| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 2c 74 65 78 74 |ndow%,ic|on%,text|
|00004430| 24 29 0d 18 60 2b 20 20 | f4 20 75 70 64 61 74 65 |$)..`+ |. update|
|00004440| 73 20 74 68 65 20 73 74 | 72 69 6e 67 20 69 6e 20 |s the st|ring in |
|00004450| 61 20 77 69 6e 64 6f 77 | 20 69 63 6f 6e 0d 18 6a |a window| icon..j|
|00004460| 1f 20 20 f4 20 61 70 70 | 6c 69 63 61 74 69 6f 6e |. . app|lication|
|00004470| 20 69 6e 64 65 70 65 6e | 64 61 6e 74 0d 18 74 0d | indepen|dant..t.|
|00004480| 20 20 ea 20 74 65 78 74 | 25 0d 18 7e 2f 20 20 69 | . text|%..~/ i|
|00004490| 63 6f 6e 5f 62 6c 6f 63 | 6b 25 21 30 3d 77 69 6e |con_bloc|k%!0=win|
|000044a0| 64 6f 77 25 3a 69 63 6f | 6e 5f 62 6c 6f 63 6b 25 |dow%:ico|n_block%|
|000044b0| 21 34 3d 69 63 6f 6e 25 | 0d 18 88 29 20 20 c8 99 |!4=icon%|...) ..|
|000044c0| 20 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 | Wimp_Ge|tIconSta|
|000044d0| 74 65 25 2c 30 2c 69 63 | 6f 6e 5f 62 6c 6f 63 6b |te%,0,ic|on_block|
|000044e0| 25 0d 18 92 1a 20 20 74 | 65 78 74 25 3d 69 63 6f |%.... t|ext%=ico|
|000044f0| 6e 5f 62 6c 6f 63 6b 25 | 21 32 38 0d 18 9c 12 20 |n_block%|!28.... |
|00004500| 20 24 74 65 78 74 25 3d | 74 65 78 74 24 0d 18 a6 | $text%=|text$...|
|00004510| 05 e1 0d 18 b0 04 0d 18 | ba 1d dd a4 72 65 61 64 |........|....read|
|00004520| 69 63 6f 6e 28 77 69 6e | 64 6f 77 25 2c 69 63 6f |icon(win|dow%,ico|
|00004530| 6e 25 29 0d 18 c4 21 20 | 20 f4 20 72 65 61 64 73 |n%)...! | . reads|
|00004540| 20 74 68 65 20 74 65 78 | 74 20 69 6e 20 61 6e 20 | the tex|t in an |
|00004550| 69 63 6f 6e 0d 18 ce 1f | 20 20 f4 20 61 70 70 6c |icon....| . appl|
|00004560| 69 63 61 74 69 6f 6e 20 | 69 6e 64 65 70 65 6e 64 |ication |independ|
|00004570| 61 6e 74 0d 18 d8 0d 20 | 20 ea 20 74 65 78 74 25 |ant.... | . text%|
|00004580| 0d 18 e2 17 20 20 de 20 | 69 63 6f 6e 5f 62 6c 6f |.... . |icon_blo|
|00004590| 63 6b 25 20 32 35 35 0d | 18 ec 2f 20 20 69 63 6f |ck% 255.|../ ico|
|000045a0| 6e 5f 62 6c 6f 63 6b 25 | 21 30 3d 77 69 6e 64 6f |n_block%|!0=windo|
|000045b0| 77 25 3a 69 63 6f 6e 5f | 62 6c 6f 63 6b 25 21 34 |w%:icon_|block%!4|
|000045c0| 3d 69 63 6f 6e 25 0d 18 | f6 29 20 20 c8 99 20 57 |=icon%..|.) .. W|
|000045d0| 69 6d 70 5f 47 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_GetI|conState|
|000045e0| 25 2c 30 2c 69 63 6f 6e | 5f 62 6c 6f 63 6b 25 0d |%,0,icon|_block%.|
|000045f0| 19 00 1a 20 20 74 65 78 | 74 25 3d 69 63 6f 6e 5f |... tex|t%=icon_|
|00004600| 62 6c 6f 63 6b 25 21 32 | 38 0d 19 0a 0b 3d 24 74 |block%!2|8....=$t|
|00004610| 65 78 74 25 0d 19 14 04 | 0d 19 1e 17 dd f2 74 69 |ext%....|......ti|
|00004620| 63 6b 28 6d 65 6e 75 25 | 2c 69 74 65 6d 25 29 0d |ck(menu%|,item%).|
|00004630| 19 28 22 20 20 f4 20 74 | 6f 67 67 6c 65 20 74 69 |.(" . t|oggle ti|
|00004640| 63 6b 20 6f 6e 20 61 20 | 6d 65 6e 75 20 69 74 65 |ck on a |menu ite|
|00004650| 6d 0d 19 32 1f 20 20 f4 | 20 61 70 70 6c 69 63 61 |m..2. .| applica|
|00004660| 74 69 6f 6e 20 69 6e 64 | 65 70 65 6e 64 61 6e 74 |tion ind|ependant|
|00004670| 0d 19 3c 10 20 20 ea 20 | 61 64 64 72 65 73 73 25 |..<. . |address%|
|00004680| 0d 19 46 28 20 20 61 64 | 64 72 65 73 73 25 20 3d |..F( ad|dress% =|
|00004690| 20 6d 65 6e 75 25 20 2b | 20 32 38 20 2b 20 28 32 | menu% +| 28 + (2|
|000046a0| 34 2a 69 74 65 6d 25 29 | 0d 19 50 23 20 20 61 64 |4*item%)|..P# ad|
|000046b0| 64 72 65 73 73 25 21 30 | 20 3d 20 61 64 64 72 65 |dress%!0| = addre|
|000046c0| 73 73 25 21 30 20 82 20 | 26 30 31 0d 19 5a 05 e1 |ss%!0 . |&01..Z..|
|000046d0| 0d 19 64 04 0d 19 6e 19 | dd f2 6e 6f 74 69 63 6b |..d...n.|..notick|
|000046e0| 28 6d 65 6e 75 25 2c 69 | 74 65 6d 25 29 0d 19 78 |(menu%,i|tem%)..x|
|000046f0| 24 20 20 f4 20 74 75 72 | 6e 20 6f 66 66 20 74 69 |$ . tur|n off ti|
|00004700| 63 6b 20 6f 6e 20 61 20 | 6d 65 6e 75 20 69 74 65 |ck on a |menu ite|
|00004710| 6d 0d 19 82 1f 20 20 f4 | 20 61 70 70 6c 69 63 61 |m.... .| applica|
|00004720| 74 69 6f 6e 20 69 6e 64 | 65 70 65 6e 64 61 6e 74 |tion ind|ependant|
|00004730| 0d 19 8c 10 20 20 ea 20 | 61 64 64 72 65 73 73 25 |.... . |address%|
|00004740| 0d 19 96 28 20 20 61 64 | 64 72 65 73 73 25 20 3d |...( ad|dress% =|
|00004750| 20 6d 65 6e 75 25 20 2b | 20 32 38 20 2b 20 28 32 | menu% +| 28 + (2|
|00004760| 34 2a 69 74 65 6d 25 29 | 0d 19 a0 25 20 20 61 64 |4*item%)|...% ad|
|00004770| 64 72 65 73 73 25 21 30 | 20 3d 20 61 64 64 72 65 |dress%!0| = addre|
|00004780| 73 73 25 21 30 20 80 20 | ac 20 26 30 31 0d 19 aa |ss%!0 . |. &01...|
|00004790| 05 e1 0d 19 b4 04 0d 19 | be 26 dd a4 6d 65 6e 75 |........|.&..menu|
|000047a0| 28 61 64 64 72 65 73 73 | 25 2c 74 69 74 6c 65 24 |(address|%,title$|
|000047b0| 2c 6d 65 6e 75 77 69 64 | 74 68 25 29 0d 19 c8 24 |,menuwid|th%)...$|
|000047c0| 20 20 f4 20 62 75 69 6c | 64 20 68 65 61 64 65 72 | . buil|d header|
|000047d0| 20 64 61 74 61 20 66 6f | 72 20 61 20 6d 65 6e 75 | data fo|r a menu|
|000047e0| 0d 19 d2 1f 20 20 f4 20 | 61 70 70 6c 69 63 61 74 |.... . |applicat|
|000047f0| 69 6f 6e 20 69 6e 64 65 | 70 65 6e 64 65 6e 74 0d |ion inde|pendent.|
|00004800| 19 dc 35 20 20 24 61 64 | 64 72 65 73 73 25 20 20 |..5 $ad|dress% |
|00004810| 20 3d 20 74 69 74 6c 65 | 24 20 20 20 20 20 20 20 | = title|$ |
|00004820| 20 20 20 20 20 20 20 3a | f4 20 6d 65 6e 75 20 74 | :|. menu t|
|00004830| 69 74 6c 65 0d 19 e6 3b | 20 20 61 64 64 72 65 73 |itle...;| addres|
|00004840| 73 25 3f 31 32 20 3d 20 | 37 20 20 20 20 20 20 20 |s%?12 = |7 |
|00004850| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 73 | | :. s|
|00004860| 74 61 6e 64 61 72 64 20 | 63 6f 6c 6f 75 72 73 0d |tandard |colours.|
|00004870| 19 f0 15 20 20 61 64 64 | 72 65 73 73 25 3f 31 33 |... add|ress%?13|
|00004880| 20 3d 20 32 0d 19 fa 15 | 20 20 61 64 64 72 65 73 | = 2....| addres|
|00004890| 73 25 3f 31 34 20 3d 20 | 37 0d 1a 04 15 20 20 61 |s%?14 = |7.... a|
|000048a0| 64 64 72 65 73 73 25 3f | 31 35 20 3d 20 30 0d 1a |ddress%?|15 = 0..|
|000048b0| 0e 39 20 20 61 64 64 72 | 65 73 73 25 21 31 36 20 |.9 addr|ess%!16 |
|000048c0| 3d 20 31 36 2b 28 31 36 | 2a 6d 65 6e 75 77 69 64 |= 16+(16|*menuwid|
|000048d0| 74 68 25 29 20 20 3a f4 | 20 77 69 64 74 68 20 69 |th%) :.| width i|
|000048e0| 6e 20 63 68 61 72 73 0d | 1a 18 31 20 20 61 64 64 |n chars.|..1 add|
|000048f0| 72 65 73 73 25 21 32 30 | 20 3d 20 34 30 20 20 20 |ress%!20| = 40 |
|00004900| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a | | :|
|00004910| f4 20 68 65 69 67 68 74 | 0d 1a 22 36 20 20 61 64 |. height|.."6 ad|
|00004920| 64 72 65 73 73 25 21 32 | 34 20 3d 20 30 20 20 20 |dress%!2|4 = 0 |
|00004930| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004940| 3a f4 20 67 61 70 20 62 | 65 74 77 65 65 6e 0d 1a |:. gap b|etween..|
|00004950| 2c 10 3d 61 64 64 72 65 | 73 73 25 2b 32 38 0d 1a |,.=addre|ss%+28..|
|00004960| 36 04 0d 1a 40 45 dd a4 | 6d 65 6e 75 69 74 65 6d |6...@E..|menuitem|
|00004970| 28 61 64 64 72 65 73 73 | 25 2c 69 74 65 6d 6e 61 |(address|%,itemna|
|00004980| 6d 65 24 2c 6d 65 6e 75 | 66 6c 61 67 73 25 2c 4f |me$,menu|flags%,O|
|00004990| 70 74 69 6f 6e 73 6d 65 | 6e 75 25 2c 69 63 6f 6e |ptionsme|nu%,icon|
|000049a0| 66 6c 61 67 73 25 29 0d | 1a 4a 22 20 20 f4 20 62 |flags%).|.J" . b|
|000049b0| 75 69 6c 64 20 64 61 74 | 61 20 66 6f 72 20 61 20 |uild dat|a for a |
|000049c0| 6d 65 6e 75 20 69 74 65 | 6d 0d 1a 54 1f 20 20 f4 |menu ite|m..T. .|
|000049d0| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 69 6e 64 | applica|tion ind|
|000049e0| 65 70 65 6e 64 65 6e 74 | 0d 1a 5e 1d 20 20 61 64 |ependent|..^. ad|
|000049f0| 64 72 65 73 73 25 21 30 | 20 3d 20 6d 65 6e 75 66 |dress%!0| = menuf|
|00004a00| 6c 61 67 73 25 0d 1a 68 | 1f 20 20 61 64 64 72 65 |lags%..h|. addre|
|00004a10| 73 73 25 21 34 20 3d 20 | 4f 70 74 69 6f 6e 73 6d |ss%!4 = |Optionsm|
|00004a20| 65 6e 75 25 0d 1a 72 1d | 20 20 61 64 64 72 65 73 |enu%..r.| addres|
|00004a30| 73 25 21 38 20 3d 20 69 | 63 6f 6e 66 6c 61 67 73 |s%!8 = i|conflags|
|00004a40| 25 0d 1a 7c 20 20 20 24 | 28 61 64 64 72 65 73 73 |%..| $|(address|
|00004a50| 25 2b 31 32 29 20 3d 20 | 69 74 65 6d 6e 61 6d 65 |%+12) = |itemname|
|00004a60| 24 0d 1a 86 10 3d 61 64 | 64 72 65 73 73 25 2b 32 |$....=ad|dress%+2|
|00004a70| 34 0d 1a 90 04 0d 1a 9a | 1c dd f2 68 65 6c 70 28 |4.......|...help(|
|00004a80| 70 72 6f 67 5f 64 69 72 | 24 2c 74 69 74 6c 65 24 |prog_dir|$,title$|
|00004a90| 29 0d 1a a4 37 20 20 f4 | 20 74 79 70 65 73 20 20 |)...7 .| types |
|00004aa0| 21 68 65 6c 70 20 69 6e | 20 63 6f 6d 6d 61 6e 64 |!help in| command|
|00004ab0| 20 77 69 6e 64 6f 77 20 | 69 6e 20 6e 6f 73 63 72 | window |in noscr|
|00004ac0| 6f 6c 6c 20 6d 6f 64 65 | 0d 1a ae 1f 20 20 f4 20 |oll mode|.... . |
|00004ad0| 61 70 70 6c 69 63 61 74 | 69 6f 6e 20 69 6e 64 65 |applicat|ion inde|
|00004ae0| 70 65 6e 64 61 6e 74 0d | 1a b8 0d 20 20 ea 20 68 |pendant.|... . h|
|00004af0| 65 6c 70 25 0d 1a c2 11 | 20 20 de 20 68 65 6c 70 |elp%....| . help|
|00004b00| 25 20 32 35 35 0d 1a cc | 13 20 20 24 68 65 6c 70 |% 255...|. $help|
|00004b10| 25 3d 74 69 74 6c 65 24 | 0d 1a d6 22 20 20 c8 99 |%=title$|..." ..|
|00004b20| 20 57 69 6d 70 5f 43 6f | 6d 6d 61 6e 64 57 69 6e | Wimp_Co|mmandWin|
|00004b30| 64 6f 77 25 2c 68 65 6c | 70 25 0d 1a e0 26 20 20 |dow%,hel|p%...& |
|00004b40| ff 28 22 2a 74 79 70 65 | 20 22 2b 70 72 6f 67 5f |.("*type| "+prog_|
|00004b50| 64 69 72 24 2b 22 2e 21 | 68 65 6c 70 22 20 20 29 |dir$+".!|help" )|
|00004b60| 0d 1a ea 1e 20 20 c8 99 | 20 57 69 6d 70 5f 43 6f |.... ..| Wimp_Co|
|00004b70| 6d 6d 61 6e 64 57 69 6e | 64 6f 77 25 2c 30 0d 1a |mmandWin|dow%,0..|
|00004b80| f4 05 e1 0d 1a fe 04 0d | 1b 08 23 dd a4 70 72 6f |........|..#..pro|
|00004b90| 62 6c 65 6d 28 6f 6b 25 | 2c 63 61 6e 63 65 6c 25 |blem(ok%|,cancel%|
|00004ba0| 2c 70 72 6f 62 6c 65 6d | 24 29 0d 1b 12 2c 20 20 |,problem|$)..., |
|00004bb0| f4 20 64 6f 65 73 20 65 | 72 72 6f 72 20 72 65 70 |. does e|rror rep|
|00004bc0| 6f 72 74 20 66 6f 72 20 | 6d 69 6e 6f 72 20 70 72 |ort for |minor pr|
|00004bd0| 6f 62 6c 65 6d 73 0d 1b | 1c 1e 20 20 f4 20 61 70 |oblems..|.. . ap|
|00004be0| 70 6c 69 63 61 74 69 6f | 6e 20 69 6e 64 65 70 6e |plicatio|n indepn|
|00004bf0| 64 61 6e 74 0d 1b 26 20 | 20 20 f4 20 73 65 74 73 |dant..& | . sets|
|00004c00| 20 75 70 20 65 72 72 6f | 72 20 64 61 74 61 20 62 | up erro|r data b|
|00004c10| 6c 6f 63 6b 0d 1b 30 2a | 20 20 ea 20 70 72 6f 62 |lock..0*| . prob|
|00004c20| 6c 65 6d 62 6c 6b 25 2c | 66 6c 61 67 73 25 2c 63 |lemblk%,|flags%,c|
|00004c30| 68 6f 69 63 65 25 2c 72 | 65 73 75 6c 74 24 0d 1b |hoice%,r|esult$..|
|00004c40| 3a 18 20 20 de 20 70 72 | 6f 62 6c 65 6d 62 6c 6b |:. . pr|oblemblk|
|00004c50| 25 20 26 31 30 30 0d 1b | 44 19 20 20 c8 99 20 48 |% &100..|D. .. H|
|00004c60| 6f 75 72 67 6c 61 73 73 | 5f 53 6d 61 73 68 25 0d |ourglass|_Smash%.|
|00004c70| 1b 4e 15 20 20 66 6c 61 | 67 73 25 20 3d 20 25 31 |.N. fla|gs% = %1|
|00004c80| 30 30 30 30 0d 1b 58 22 | 20 20 e7 20 6f 6b 25 20 |0000..X"| . ok% |
|00004c90| 8c 20 66 6c 61 67 73 25 | 3d 20 66 6c 61 67 73 25 |. flags%|= flags%|
|00004ca0| 20 84 20 25 30 31 0d 1b | 62 27 20 20 e7 20 63 61 | . %01..|b' . ca|
|00004cb0| 6e 63 65 6c 25 20 8c 20 | 66 6c 61 67 73 25 20 3d |ncel% . |flags% =|
|00004cc0| 20 66 6c 61 67 73 25 20 | 84 20 25 31 30 0d 1b 6c | flags% |. %10..l|
|00004cd0| 19 20 20 21 70 72 6f 62 | 6c 65 6d 62 6c 6b 25 3d |. !prob|lemblk%=|
|00004ce0| 66 6c 61 67 73 25 0d 1b | 76 1f 20 20 24 28 70 72 |flags%..|v. $(pr|
|00004cf0| 6f 62 6c 65 6d 62 6c 6b | 25 2b 34 29 3d 70 72 6f |oblemblk|%+4)=pro|
|00004d00| 62 6c 65 6d 24 0d 1b 80 | 29 20 20 70 72 6f 62 6c |blem$...|) probl|
|00004d10| 65 6d 62 6c 6b 25 3f 28 | 34 2b a9 24 28 70 72 6f |emblk%?(|4+.$(pro|
|00004d20| 62 6c 65 6d 62 6c 6b 25 | 2b 34 29 29 3d 30 0d 1b |blemblk%|+4))=0..|
|00004d30| 8a 44 20 20 c8 99 20 57 | 69 6d 70 5f 52 65 70 6f |.D .. W|imp_Repo|
|00004d40| 72 74 45 72 72 6f 72 25 | 2c 20 70 72 6f 62 6c 65 |rtError%|, proble|
|00004d50| 6d 62 6c 6b 25 2c 66 6c | 61 67 73 25 2c 22 44 69 |mblk%,fl|ags%,"Di|
|00004d60| 73 63 4c 61 62 65 6c 22 | 20 b8 2c 63 68 6f 69 63 |scLabel"| .,choic|
|00004d70| 65 25 0d 1b 94 12 20 20 | c8 8e 20 63 68 6f 69 63 |e%.... |.. choic|
|00004d80| 65 25 20 ca 0d 1b 9e 0b | 20 20 20 20 c9 20 30 0d |e% .....| . 0.|
|00004d90| 1b a8 18 20 20 20 20 20 | 20 72 65 73 75 6c 74 24 |... | result$|
|00004da0| 3d 22 6e 6f 6e 65 22 0d | 1b b2 0b 20 20 20 20 c9 |="none".|... .|
|00004db0| 20 31 0d 1b bc 16 20 20 | 20 20 20 20 72 65 73 75 | 1.... | resu|
|00004dc0| 6c 74 24 3d 22 6f 6b 22 | 0d 1b c6 0b 20 20 20 20 |lt$="ok"|.... |
|00004dd0| c9 20 32 0d 1b d0 1a 20 | 20 20 20 20 20 72 65 73 |. 2.... | res|
|00004de0| 75 6c 74 24 3d 22 63 61 | 6e 63 65 6c 22 0d 1b da |ult$="ca|ncel"...|
|00004df0| 09 20 20 20 20 7f 0d 1b | e4 18 20 20 20 20 20 20 |. ...|.. |
|00004e00| 85 20 31 2c 22 57 69 6d | 70 20 42 75 67 22 0d 1b |. 1,"Wim|p Bug"..|
|00004e10| ee 07 20 20 cb 0d 1b f8 | 0c 3d 72 65 73 75 6c 74 |.. ....|.=result|
|00004e20| 24 0d 1c 02 04 0d 1c 0c | 18 dd f2 65 72 72 6f 72 |$.......|...error|
|00004e30| 62 6f 78 28 61 70 70 6e | 61 6d 65 24 29 0d 1c 16 |box(appn|ame$)...|
|00004e40| 19 20 20 f4 20 72 65 71 | 75 69 72 65 73 20 46 4e |. . req|uires FN|
|00004e50| 65 72 72 62 6c 6b 0d 1c | 20 1f 20 20 f4 20 61 70 |errblk..| . . ap|
|00004e60| 70 6c 69 63 61 74 69 6f | 6e 20 69 6e 64 65 70 65 |plicatio|n indepe|
|00004e70| 6e 64 61 6e 74 0d 1c 2a | 0f 20 20 ea 20 72 65 73 |ndant..*|. . res|
|00004e80| 75 6c 74 25 0d 1c 34 08 | 20 20 ef 33 0d 1c 3e 1f |ult%..4.| .3..>.|
|00004e90| 20 20 c8 99 20 57 69 6d | 70 5f 43 6f 6d 6d 61 6e | .. Wim|p_Comman|
|00004ea0| 64 57 69 6e 64 6f 77 25 | 2c 2d 31 0d 1c 48 4e 20 |dWindow%|,-1..HN |
|00004eb0| 20 c8 99 20 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 | .. Wimp|_ReportE|
|00004ec0| 72 72 6f 72 25 2c 20 a4 | 65 72 72 62 6c 6b 28 61 |rror%, .|errblk(a|
|00004ed0| 70 70 6e 61 6d 65 24 2c | 9f 2c f6 24 29 2c 25 31 |ppname$,|.,.$),%1|
|00004ee0| 31 2c 22 44 69 73 63 4c | 61 62 65 6c 22 20 b8 20 |1,"DiscL|abel" . |
|00004ef0| 2c 72 65 73 75 6c 74 25 | 3a 0d 1c 52 15 20 20 e7 |,result%|:..R. .|
|00004f00| 20 72 65 73 75 6c 74 25 | 20 3d 20 32 20 8c 0d 1c | result%| = 2 ...|
|00004f10| 5c 1a 20 20 20 20 c8 99 | 20 57 69 6d 70 5f 43 6c |\. ..| Wimp_Cl|
|00004f20| 6f 73 65 44 6f 77 6e 25 | 0d 1c 66 09 20 20 20 20 |oseDown%|..f. |
|00004f30| e0 0d 1c 70 07 20 20 cd | 0d 1c 7a 05 e1 0d 1c 84 |...p. .|..z.....|
|00004f40| 04 0d 1c 8e 23 dd a4 65 | 72 72 62 6c 6b 28 61 70 |....#..e|rrblk(ap|
|00004f50| 70 6e 61 6d 65 24 2c 65 | 72 72 25 2c 72 65 70 6f |pname$,e|rr%,repo|
|00004f60| 72 74 24 29 0d 1c 98 20 | 20 20 f4 20 73 65 74 73 |rt$)... | . sets|
|00004f70| 20 75 70 20 65 72 72 6f | 72 20 64 61 74 61 20 62 | up erro|r data b|
|00004f80| 6c 6f 63 6b 0d 1c a2 0f | 20 20 ea 20 65 72 72 62 |lock....| . errb|
|00004f90| 6c 6b 25 0d 1c ac 14 20 | 20 de 20 65 72 72 62 6c |lk%.... | . errbl|
|00004fa0| 6b 25 20 26 31 30 30 0d | 1c b6 19 20 20 c8 99 20 |k% &100.|... .. |
|00004fb0| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 25 |Hourglas|s_Smash%|
|00004fc0| 0d 1c c0 13 20 20 21 65 | 72 72 62 6c 6b 25 3d 65 |.... !e|rrblk%=e|
|00004fd0| 72 72 25 0d 1c ca 79 20 | 20 24 28 65 72 72 62 6c |rr%...y | $(errbl|
|00004fe0| 6b 25 2b 34 29 3d 22 55 | 6e 64 6f 63 75 6d 65 6e |k%+4)="U|ndocumen|
|00004ff0| 74 65 64 20 66 65 61 74 | 75 72 65 3a 20 22 2b 72 |ted feat|ure: "+r|
|00005000| 65 70 6f 72 74 24 2b 22 | 20 41 74 20 6c 69 6e 65 |eport$+"| At line|
|00005010| 20 22 2b c3 9e 2b 22 2e | 20 55 73 65 20 4f 4b 20 | "+..+".| Use OK |
|00005020| 74 6f 20 63 6f 6e 74 69 | 6e 75 65 20 6f 72 20 43 |to conti|nue or C|
|00005030| 61 6e 63 65 6c 20 74 6f | 20 6b 69 6c 6c 20 22 2b |ancel to| kill "+|
|00005040| 61 70 70 6e 61 6d 65 24 | 2b 22 2e 22 0d 1c d4 21 |appname$|+"."...!|
|00005050| 20 20 65 72 72 62 6c 6b | 25 3f 28 34 2b a9 24 28 | errblk|%?(4+.$(|
|00005060| 65 72 72 62 6c 6b 25 2b | 34 29 29 3d 30 0d 1c de |errblk%+|4))=0...|
|00005070| 0c 3d 65 72 72 62 6c 6b | 25 0d 1c e8 04 0d 1c f2 |.=errblk|%.......|
|00005080| 10 dd f2 73 77 69 6e 75 | 6d 62 65 72 73 0d 1c fc |...swinu|mbers...|
|00005090| 48 20 20 c8 99 20 22 4f | 53 5f 53 57 49 4e 75 6d |H .. "O|S_SWINum|
|000050a0| 62 65 72 46 72 6f 6d 53 | 74 72 69 6e 67 22 2c 2c |berFromS|tring",,|
|000050b0| 22 4f 53 5f 53 57 49 4e | 75 6d 62 65 72 46 72 6f |"OS_SWIN|umberFro|
|000050c0| 6d 53 74 72 69 6e 67 22 | 20 b8 20 53 57 49 6e 75 |mString"| . SWInu|
|000050d0| 6d 62 65 72 25 0d 1d 06 | 43 20 20 c8 99 20 53 57 |mber%...|C .. SW|
|000050e0| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 4f 53 5f 52 65 |Inumber%|,,"OS_Re|
|000050f0| 61 64 4d 6f 64 65 56 61 | 72 69 61 62 6c 65 22 20 |adModeVa|riable" |
|00005100| 20 20 b8 20 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 | . OS_R|eadModeV|
|00005110| 61 72 69 61 62 6c 65 25 | 0d 1d 10 3d 20 20 c8 99 |ariable%|...= ..|
|00005120| 20 53 57 49 6e 75 6d 62 | 65 72 25 2c 2c 22 4f 53 | SWInumb|er%,,"OS|
|00005130| 5f 52 65 61 64 56 61 72 | 56 61 6c 22 20 20 20 20 |_ReadVar|Val" |
|00005140| 20 20 20 20 20 b8 20 4f | 53 5f 52 65 61 64 56 61 | . O|S_ReadVa|
|00005150| 72 56 61 6c 25 0d 1d 1a | 3e 20 20 c8 99 20 53 57 |rVal%...|> .. SW|
|00005160| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|00005170| 43 6c 6f 73 65 44 6f 77 | 6e 22 20 20 20 20 20 20 |CloseDow|n" |
|00005180| 20 20 b8 20 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f | . Wimp|_CloseDo|
|00005190| 77 6e 25 0d 1d 24 42 20 | 20 c8 99 20 53 57 49 6e |wn%..$B | .. SWIn|
|000051a0| 75 6d 62 65 72 25 2c 2c | 22 57 69 6d 70 5f 43 6c |umber%,,|"Wimp_Cl|
|000051b0| 6f 73 65 54 65 6d 70 6c | 61 74 65 22 20 20 20 20 |oseTempl|ate" |
|000051c0| b8 20 57 69 6d 70 5f 43 | 6c 6f 73 65 54 65 6d 70 |. Wimp_C|loseTemp|
|000051d0| 6c 61 74 65 25 0d 1d 2e | 40 20 20 c8 99 20 53 57 |late%...|@ .. SW|
|000051e0| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|000051f0| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 20 20 20 20 |CloseWin|dow" |
|00005200| 20 20 b8 20 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 | . Wimp|_CloseWi|
|00005210| 6e 64 6f 77 25 0d 1d 38 | 42 20 20 c8 99 20 53 57 |ndow%..8|B .. SW|
|00005220| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|00005230| 43 6f 6d 6d 61 6e 64 57 | 69 6e 64 6f 77 22 20 20 |CommandW|indow" |
|00005240| 20 20 b8 20 57 69 6d 70 | 5f 43 6f 6d 6d 61 6e 64 | . Wimp|_Command|
|00005250| 57 69 6e 64 6f 77 25 0d | 1d 42 3f 20 20 c8 99 20 |Window%.|.B? .. |
|00005260| 53 57 49 6e 75 6d 62 65 | 72 25 2c 2c 22 57 69 6d |SWInumbe|r%,,"Wim|
|00005270| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 20 20 20 |p_Create|Icon" |
|00005280| 20 20 20 20 b8 20 57 69 | 6d 70 5f 43 72 65 61 74 | . Wi|mp_Creat|
|00005290| 65 49 63 6f 6e 25 0d 1d | 4c 3f 20 20 c8 99 20 53 |eIcon%..|L? .. S|
|000052a0| 57 49 6e 75 6d 62 65 72 | 25 2c 2c 22 57 69 6d 70 |WInumber|%,,"Wimp|
|000052b0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 20 20 20 20 |_CreateM|enu" |
|000052c0| 20 20 20 b8 20 57 69 6d | 70 5f 43 72 65 61 74 65 | . Wim|p_Create|
|000052d0| 4d 65 6e 75 25 0d 1d 56 | 41 20 20 c8 99 20 53 57 |Menu%..V|A .. SW|
|000052e0| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|000052f0| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 20 20 20 |CreateWi|ndow" |
|00005300| 20 20 b8 20 57 69 6d 70 | 5f 43 72 65 61 74 65 57 | . Wimp|_CreateW|
|00005310| 69 6e 64 6f 77 25 0d 1d | 60 3f 20 20 c8 99 20 53 |indow%..|`? .. S|
|00005320| 57 49 6e 75 6d 62 65 72 | 25 2c 2c 22 57 69 6d 70 |WInumber|%,,"Wimp|
|00005330| 5f 44 65 63 6f 64 65 4d | 65 6e 75 22 20 20 20 20 |_DecodeM|enu" |
|00005340| 20 20 20 b8 20 57 69 6d | 70 5f 44 65 63 6f 64 65 | . Wim|p_Decode|
|00005350| 4d 65 6e 75 25 0d 1d 6a | 40 20 20 c8 99 20 53 57 |Menu%..j|@ .. SW|
|00005360| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|00005370| 46 6f 72 63 65 52 65 64 | 72 61 77 22 20 20 20 20 |ForceRed|raw" |
|00005380| 20 20 b8 20 57 69 6d 70 | 5f 46 6f 72 63 65 52 65 | . Wimp|_ForceRe|
|00005390| 64 72 61 77 25 0d 1d 74 | 41 20 20 c8 99 20 53 57 |draw%..t|A .. SW|
|000053a0| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|000053b0| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 20 20 20 |GetIconS|tate" |
|000053c0| 20 20 b8 20 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e | . Wimp|_GetIcon|
|000053d0| 53 74 61 74 65 25 0d 1d | 7e 43 20 20 c8 99 20 53 |State%..|~C .. S|
|000053e0| 57 49 6e 75 6d 62 65 72 | 25 2c 2c 22 57 69 6d 70 |WInumber|%,,"Wimp|
|000053f0| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 22 |_GetPoin|terInfo"|
|00005400| 20 20 20 b8 20 57 69 6d | 70 5f 47 65 74 50 6f 69 | . Wim|p_GetPoi|
|00005410| 6e 74 65 72 49 6e 66 6f | 25 0d 1d 88 41 20 20 c8 |nterInfo|%...A .|
|00005420| 99 20 53 57 49 6e 75 6d | 62 65 72 25 2c 2c 22 57 |. SWInum|ber%,,"W|
|00005430| 69 6d 70 5f 47 65 74 52 | 65 63 74 61 6e 67 6c 65 |imp_GetR|ectangle|
|00005440| 22 20 20 20 20 20 b8 20 | 57 69 6d 70 5f 47 65 74 |" . |Wimp_Get|
|00005450| 52 65 63 74 61 6e 67 6c | 65 25 0d 1d 92 42 20 20 |Rectangl|e%...B |
|00005460| c8 99 20 53 57 49 6e 75 | 6d 62 65 72 25 2c 2c 22 |.. SWInu|mber%,,"|
|00005470| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 49 6e |Wimp_Get|WindowIn|
|00005480| 66 6f 22 20 20 20 20 b8 | 20 57 69 6d 70 5f 47 65 |fo" .| Wimp_Ge|
|00005490| 74 57 69 6e 64 6f 77 49 | 6e 66 6f 25 0d 1d 9c 3f |tWindowI|nfo%...?|
|000054a0| 20 20 c8 99 20 53 57 49 | 6e 75 6d 62 65 72 25 2c | .. SWI|number%,|
|000054b0| 2c 22 57 69 6d 70 5f 49 | 6e 69 74 69 61 6c 69 73 |,"Wimp_I|nitialis|
|000054c0| 65 22 20 20 20 20 20 20 | 20 b8 20 57 69 6d 70 5f |e" | . Wimp_|
|000054d0| 49 6e 69 74 69 61 6c 69 | 73 65 25 0d 1d a6 41 20 |Initiali|se%...A |
|000054e0| 20 c8 99 20 53 57 49 6e | 75 6d 62 65 72 25 2c 2c | .. SWIn|umber%,,|
|000054f0| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|00005500| 74 65 22 20 20 20 20 20 | b8 20 57 69 6d 70 5f 4c |te" |. Wimp_L|
|00005510| 6f 61 64 54 65 6d 70 6c | 61 74 65 25 0d 1d b0 41 |oadTempl|ate%...A|
|00005520| 20 20 c8 99 20 53 57 49 | 6e 75 6d 62 65 72 25 2c | .. SWI|number%,|
|00005530| 2c 22 57 69 6d 70 5f 4f | 70 65 6e 54 65 6d 70 6c |,"Wimp_O|penTempl|
|00005540| 61 74 65 22 20 20 20 20 | 20 b8 20 57 69 6d 70 5f |ate" | . Wimp_|
|00005550| 4f 70 65 6e 54 65 6d 70 | 6c 61 74 65 25 0d 1d ba |OpenTemp|late%...|
|00005560| 3f 20 20 c8 99 20 53 57 | 49 6e 75 6d 62 65 72 25 |? .. SW|Inumber%|
|00005570| 2c 2c 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |,,"Wimp_|OpenWind|
|00005580| 6f 77 22 20 20 20 20 20 | 20 20 b8 20 57 69 6d 70 |ow" | . Wimp|
|00005590| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 25 0d 1d c4 39 |_OpenWin|dow%...9|
|000055a0| 20 20 c8 99 20 53 57 49 | 6e 75 6d 62 65 72 25 2c | .. SWI|number%,|
|000055b0| 2c 22 57 69 6d 70 5f 50 | 6f 6c 6c 22 20 20 20 20 |,"Wimp_P|oll" |
|000055c0| 20 20 20 20 20 20 20 20 | 20 b8 20 57 69 6d 70 5f | | . Wimp_|
|000055d0| 50 6f 6c 6c 25 0d 1d ce | 3f 20 20 c8 99 20 53 57 |Poll%...|? .. SW|
|000055e0| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|000055f0| 50 72 6f 63 65 73 73 4b | 65 79 22 20 20 20 20 20 |ProcessK|ey" |
|00005600| 20 20 b8 20 57 69 6d 70 | 5f 50 72 6f 63 65 73 73 | . Wimp|_Process|
|00005610| 4b 65 79 25 0d 1d d8 41 | 20 20 c8 99 20 53 57 49 |Key%...A| .. SWI|
|00005620| 6e 75 6d 62 65 72 25 2c | 2c 22 57 69 6d 70 5f 52 |number%,|,"Wimp_R|
|00005630| 65 64 72 61 77 57 69 6e | 64 6f 77 22 20 20 20 20 |edrawWin|dow" |
|00005640| 20 b8 20 57 69 6d 70 5f | 52 65 64 72 61 77 57 69 | . Wimp_|RedrawWi|
|00005650| 6e 64 6f 77 25 0d 1d e2 | 40 20 20 c8 99 20 53 57 |ndow%...|@ .. SW|
|00005660| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|00005670| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 20 20 20 20 |ReportEr|ror" |
|00005680| 20 20 b8 20 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 | . Wimp|_ReportE|
|00005690| 72 72 6f 72 25 0d 1d ec | 40 20 20 c8 99 20 53 57 |rror%...|@ .. SW|
|000056a0| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|000056b0| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 20 20 20 20 |SendMess|age" |
|000056c0| 20 20 b8 20 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 | . Wimp|_SendMes|
|000056d0| 73 61 67 65 25 0d 1d f6 | 45 20 20 c8 99 20 53 57 |sage%...|E .. SW|
|000056e0| 49 6e 75 6d 62 65 72 25 | 2c 2c 22 57 69 6d 70 5f |Inumber%|,,"Wimp_|
|000056f0| 53 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |SetCaret|Position|
|00005700| 22 20 b8 20 57 69 6d 70 | 5f 53 65 74 43 61 72 65 |" . Wimp|_SetCare|
|00005710| 74 50 6f 73 69 74 69 6f | 6e 25 0d 1e 00 3d 20 20 |tPositio|n%...= |
|00005720| c8 99 20 53 57 49 6e 75 | 6d 62 65 72 25 2c 2c 22 |.. SWInu|mber%,,"|
|00005730| 57 69 6d 70 5f 53 70 72 | 69 74 65 4f 70 22 20 20 |Wimp_Spr|iteOp" |
|00005740| 20 20 20 20 20 20 20 b8 | 20 57 69 6d 70 5f 53 70 | .| Wimp_Sp|
|00005750| 72 69 74 65 4f 70 25 0d | 1e 0a 36 20 20 c8 99 20 |riteOp%.|..6 .. |
|00005760| 53 57 49 6e 75 6d 62 65 | 72 25 2c 2c 22 48 6f 75 |SWInumbe|r%,,"Hou|
|00005770| 72 67 6c 61 73 73 5f 4f | 6e 22 20 20 20 20 b8 20 |rglass_O|n" . |
|00005780| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 6e 25 0d 1e 14 |Hourglas|s_On%...|
|00005790| 37 20 20 c8 99 20 53 57 | 49 6e 75 6d 62 65 72 25 |7 .. SW|Inumber%|
|000057a0| 2c 2c 22 48 6f 75 72 67 | 6c 61 73 73 5f 4f 66 66 |,,"Hourg|lass_Off|
|000057b0| 22 20 20 20 b8 20 48 6f | 75 72 67 6c 61 73 73 5f |" . Ho|urglass_|
|000057c0| 4f 66 66 25 0d 1e 1e 39 | 20 20 c8 99 20 53 57 49 |Off%...9| .. SWI|
|000057d0| 6e 75 6d 62 65 72 25 2c | 2c 22 48 6f 75 72 67 6c |number%,|,"Hourgl|
|000057e0| 61 73 73 5f 53 6d 61 73 | 68 22 20 b8 20 48 6f 75 |ass_Smas|h" . Hou|
|000057f0| 72 67 6c 61 73 73 5f 53 | 6d 61 73 68 25 0d 1e 28 |rglass_S|mash%..(|
|00005800| 05 e1 0d 1e 32 04 0d 1e | 3c 1f dd f2 6f 70 65 6e |....2...|<...open|
|00005810| 63 6c 6f 73 65 64 77 69 | 6e 64 6f 77 28 77 69 6e |closedwi|ndow(win|
|00005820| 64 6f 77 25 29 0d 1e 46 | 38 20 20 f4 20 6f 70 65 |dow%)..F|8 . ope|
|00005830| 6e 73 20 61 20 63 6c 6f | 73 65 64 20 77 69 6e 64 |ns a clo|sed wind|
|00005840| 6f 77 20 69 65 20 6e 6f | 74 20 63 75 72 72 65 6e |ow ie no|t curren|
|00005850| 74 6c 79 20 6f 6e 20 73 | 63 72 65 65 6e 0d 1e 50 |tly on s|creen..P|
|00005860| 1f 20 20 f4 20 61 70 70 | 6c 69 63 61 74 69 6f 6e |. . app|lication|
|00005870| 20 69 6e 64 65 70 65 6e | 64 61 6e 74 0d 1e 5a 0a | indepen|dant..Z.|
|00005880| 20 20 ea 20 71 25 0d 1e | 64 0f 20 20 de 20 71 25 | . q%..|d. . q%|
|00005890| 20 31 30 30 30 0d 1e 6e | 16 20 20 71 25 21 30 3d | 1000..n|. q%!0=|
|000058a0| 64 69 73 63 77 69 6e 64 | 6f 77 25 0d 1e 78 20 20 |discwind|ow%..x |
|000058b0| 20 c8 99 20 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 | .. Wimp|_GetWind|
|000058c0| 6f 77 49 6e 66 6f 25 2c | 2c 71 25 0d 1e 82 1d 20 |owInfo%,|,q%.... |
|000058d0| 20 c8 99 20 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e | .. Wimp|_OpenWin|
|000058e0| 64 6f 77 25 2c 2c 71 25 | 0d 1e 8c 05 e1 0d 1e 96 |dow%,,q%|........|
|000058f0| 41 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |A-------|--------|
|00005900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 1e |--------|------..|
|00005930| a0 04 0d 1e aa 22 f4 20 | 75 6e 64 65 72 20 64 65 |.....". |under de|
|00005940| 76 65 6c 6f 70 6d 65 6e | 74 20 62 65 6c 6f 77 20 |velopmen|t below |
|00005950| 68 65 72 65 0d 1e b4 04 | 0d 1e be 04 0d 1e c8 0a |here....|........|
|00005960| dd a4 73 6c 6f 74 0d 1e | d2 0f 20 20 ea 20 66 69 |..slot..|.. . fi|
|00005970| 6e 69 73 68 25 0d 1e dc | 11 20 20 de 20 66 69 6e |nish%...|. . fin|
|00005980| 69 73 68 25 20 30 0d 1e | e6 11 3d 20 66 69 6e 69 |ish% 0..|..= fini|
|00005990| 73 68 25 20 2d 20 90 0d | 1e f0 04 0d 1e fa 04 0d |sh% - ..|........|
|000059a0| 1f 04 12 dd 20 f2 73 61 | 76 65 5f 63 6f 6e 66 69 |.... .sa|ve_confi|
|000059b0| 67 0d 1f 0e 0d 20 20 ea | 20 69 63 6f 6e 25 0d 1f |g.... .| icon%..|
|000059c0| 18 27 20 20 66 69 6c 65 | 25 3d ae 28 70 72 6f 67 |.' file|%=.(prog|
|000059d0| 5f 64 69 72 24 20 2b 20 | 22 2e 43 6f 6e 66 69 67 |_dir$ + |".Config|
|000059e0| 75 72 65 22 29 0d 1f 22 | 15 20 20 e3 20 69 63 6f |ure").."|. . ico|
|000059f0| 6e 25 3d 31 35 20 b8 20 | 31 37 0d 1f 2c 2e 20 20 |n%=15 . |17..,. |
|00005a00| 20 20 f1 23 66 69 6c 65 | 25 2c 20 a4 72 65 61 64 | .#file|%, .read|
|00005a10| 69 63 6f 6e 28 64 69 73 | 63 77 69 6e 64 6f 77 25 |icon(dis|cwindow%|
|00005a20| 2c 20 69 63 6f 6e 25 29 | 0d 1f 36 07 20 20 ed 0d |, icon%)|..6. ..|
|00005a30| 1f 40 0d 20 20 d9 23 66 | 69 6c 65 25 0d 1f 4a 05 |.@. .#f|ile%..J.|
|00005a40| e1 0d 1f 54 04 0d 1f 5e | 12 dd 20 f2 6c 6f 61 64 |...T...^|.. .load|
|00005a50| 5f 63 6f 6e 66 69 67 0d | 1f 68 14 20 20 ea 20 69 |_config.|.h. . i|
|00005a60| 63 6f 6e 25 2c 20 74 65 | 78 74 24 0d 1f 72 27 20 |con%, te|xt$..r' |
|00005a70| 20 66 69 6c 65 25 3d 8e | 28 70 72 6f 67 5f 64 69 | file%=.|(prog_di|
|00005a80| 72 24 20 2b 20 22 2e 43 | 6f 6e 66 69 67 75 72 65 |r$ + ".C|onfigure|
|00005a90| 22 29 0d 1f 7c 15 20 20 | e3 20 69 63 6f 6e 25 3d |")..|. |. icon%=|
|00005aa0| 31 35 20 b8 20 31 37 0d | 1f 86 16 20 20 20 20 e8 |15 . 17.|... .|
|00005ab0| 23 66 69 6c 65 25 2c 20 | 74 65 78 74 24 0d 1f 90 |#file%, |text$...|
|00005ac0| 2e 20 20 20 20 f2 75 70 | 64 61 74 65 69 63 6f 6e |. .up|dateicon|
|00005ad0| 28 64 69 73 63 77 69 6e | 64 6f 77 25 2c 20 69 63 |(discwin|dow%, ic|
|00005ae0| 6f 6e 25 2c 20 74 65 78 | 74 24 29 0d 1f 9a 07 20 |on%, tex|t$).... |
|00005af0| 20 ed 0d 1f a4 0d 20 20 | d9 23 66 69 6c 65 25 0d | ..... |.#file%.|
|00005b00| 1f ae 05 e1 0d ff | |...... | |
+--------+-------------------------+-------------------------+--------+--------+
